diff options
author | groditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2008-07-10 19:04:23 +0000 |
---|---|---|
committer | groditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2008-07-10 19:04:23 +0000 |
commit | d88f18a05c2bb2536031f46a09a54e14341e73d4 (patch) | |
tree | f92d57bab283076a4bcc5acf2ce2610093d02f00 /lib/Reaction/InterfaceModel | |
parent | 4653d65d9bbb9ab8f6550a78dc402a2bf9cadd52 (diff) | |
download | reaction-d88f18a05c2bb2536031f46a09a54e14341e73d4.tar.gz reaction-d88f18a05c2bb2536031f46a09a54e14341e73d4.zip |
fix the parameter attributes goof re meta
Diffstat (limited to 'lib/Reaction/InterfaceModel')
-rw-r--r-- | lib/Reaction/InterfaceModel/Reflector/DBIC.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Reaction/InterfaceModel/Reflector/DBIC.pm b/lib/Reaction/InterfaceModel/Reflector/DBIC.pm index dc9a947..cde8c79 100644 --- a/lib/Reaction/InterfaceModel/Reflector/DBIC.pm +++ b/lib/Reaction/InterfaceModel/Reflector/DBIC.pm @@ -763,7 +763,7 @@ class DBIC, which { # attributes => qr//, #DWIM, treated as [qr//] # attributes => [{...}] #DWIM, treat as [qr/./, {...} ] # attributes => [[-exclude => ...]] #DWIM, treat as [qr/./, [-exclude => ...]] - my $attr_haystack = [ map { $_->name } $object->meta->parameter_attributes ]; + my $attr_haystack = [ map { $_->name } $object->parameter_attributes ]; if(!defined $attr_rules){ $attr_rules = [qr/./]; } elsif( (!ref $attr_rules && $attr_rules) || (ref $attr_rules eq 'Regexp') ){ |