diff options
author | groditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2008-06-14 03:12:43 +0000 |
---|---|---|
committer | groditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2008-06-14 03:12:43 +0000 |
commit | dcd5fef705e78ae7c8ca1c7be9874486aa595fbb (patch) | |
tree | f79c9454e33f69d0ae9d23400e7a3d1e9f0b68dd /lib/Reaction/InterfaceModel | |
parent | df9a9c12d191bc0a4fa397f14134784850f8a827 (diff) | |
download | reaction-dcd5fef705e78ae7c8ca1c7be9874486aa595fbb.tar.gz reaction-dcd5fef705e78ae7c8ca1c7be9874486aa595fbb.zip |
*grumble*inheritable classdata *grumble*
Diffstat (limited to 'lib/Reaction/InterfaceModel')
-rw-r--r-- | lib/Reaction/InterfaceModel/Reflector/DBIC.pm | 20 |
1 files changed, 0 insertions, 20 deletions
diff --git a/lib/Reaction/InterfaceModel/Reflector/DBIC.pm b/lib/Reaction/InterfaceModel/Reflector/DBIC.pm index 5c852b6..ddd8899 100644 --- a/lib/Reaction/InterfaceModel/Reflector/DBIC.pm +++ b/lib/Reaction/InterfaceModel/Reflector/DBIC.pm @@ -340,26 +340,6 @@ class DBIC, which { }, ); -# my %debug_attr_opts = -# ( -# lazy => 1, -# required => 1, -# isa => $collection, -# reader => $reader, -# predicate => "has_" . $self->_class_to_attribute_name($name) , -# domain_model => $dm_name, -# orig_attr_name => $source, -# default => qq^sub { -# my \$self = \$_[0]; -# return $collection->new( -# _source_resultset => \$self->$dm_name->resultset("$source"), -# _parent => \$self, -# ); -# }, ^, -# ); - - - my $make_immutable = $meta->is_immutable; $meta->make_mutable if $make_immutable; my $attr = $meta->add_attribute($name, %attr_opts); |