X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/0b2ca0abb53db0d372bcc51e8093abb30f2aeea6..e14cb525c640cb15bb6b2dfb62ccebbe78cb45cd:/SL/DB/PeriodicInvoicesConfig.pm diff --git a/SL/DB/PeriodicInvoicesConfig.pm b/SL/DB/PeriodicInvoicesConfig.pm index d49595bb5..bb64a5b3c 100644 --- a/SL/DB/PeriodicInvoicesConfig.pm +++ b/SL/DB/PeriodicInvoicesConfig.pm @@ -2,8 +2,6 @@ package SL::DB::PeriodicInvoicesConfig; use strict; -use Readonly; - use SL::DB::MetaSetup::PeriodicInvoicesConfig; __PACKAGE__->meta->add_relationships( @@ -19,8 +17,8 @@ __PACKAGE__->meta->initialize; # Creates get_all, get_all_count, get_all_iterator, delete_all and update_all. __PACKAGE__->meta->make_manager_class; -Readonly our @PERIODICITIES => qw(m q f b y); -Readonly our %PERIOD_LENGTHS => ( m => 1, q => 3, f => 4, b => 6, y => 12 ); +our @PERIODICITIES = qw(m q f b y); +our %PERIOD_LENGTHS = ( m => 1, q => 3, f => 4, b => 6, y => 12 ); sub get_period_length { my $self = shift;