X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FObject.pm;h=71e0a3939b3f76b147aaa89eb8db49c0c9706f50;hb=89c9ff022d3f13e27ba6bda085df15707fcfb0eb;hp=9ac7644f9ae1dc0632f11c90ddf6a4eaa2513706;hpb=6fd01c3dd7476e488515f60da87e9c35063f6cc9;p=kivitendo-erp.git diff --git a/SL/DB/Object.pm b/SL/DB/Object.pm index 9ac7644f9..71e0a3939 100644 --- a/SL/DB/Object.pm +++ b/SL/DB/Object.pm @@ -2,7 +2,6 @@ package SL::DB::Object; use strict; -use Readonly; use Rose::DB::Object; use List::MoreUtils qw(any); @@ -41,7 +40,7 @@ sub _get_manager_class { return $class->meta->convention_manager->auto_manager_class_name($class); } -Readonly my %text_column_types => (text => 1, char => 1, varchar => 1); +my %text_column_types = (text => 1, char => 1, varchar => 1); sub assign_attributes { my $self = shift;