Revision dc04e2cb
Von Moritz Bunkus vor fast 14 Jahren hinzugefügt
| SL/DB/Object.pm | ||
|---|---|---|
| 2 | 2 |
|
| 3 | 3 |
use strict; |
| 4 | 4 |
|
| 5 |
use Readonly; |
|
| 6 | 5 |
use Rose::DB::Object; |
| 7 | 6 |
use List::MoreUtils qw(any); |
| 8 | 7 |
|
| ... | ... | |
| 41 | 40 |
return $class->meta->convention_manager->auto_manager_class_name($class); |
| 42 | 41 |
} |
| 43 | 42 |
|
| 44 |
Readonly my %text_column_types => (text => 1, char => 1, varchar => 1);
|
|
| 43 |
my %text_column_types = (text => 1, char => 1, varchar => 1);
|
|
| 45 | 44 |
|
| 46 | 45 |
sub assign_attributes {
|
| 47 | 46 |
my $self = shift; |
Auch abrufbar als: Unified diff
Alle Vorkommen von "Readonly" entfernt