use Modern::Perl;
require Exporter;
-use Carp;
+use Carp qw( croak );
use C4::Context;
use Koha::DateUtils qw( dt_from_string );
use vars qw(@ISA @EXPORT);
BEGIN {
- @ISA = qw(Exporter);
- @EXPORT = qw(
- &UpdateStats
- );
+ @ISA = qw(Exporter);
+ @EXPORT = qw(
+ UpdateStats
+ );
}