From dcd5fef705e78ae7c8ca1c7be9874486aa595fbb Mon Sep 17 00:00:00 2001 From: groditi Date: Sat, 14 Jun 2008 03:12:43 +0000 Subject: *grumble*inheritable classdata *grumble* --- lib/Reaction/InterfaceModel/Reflector/DBIC.pm | 20 -------------------- 1 file changed, 20 deletions(-) (limited to 'lib/Reaction/InterfaceModel/Reflector/DBIC.pm') 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); -- cgit v1.2.3-54-g00ecf