X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst%2FBase.pm;fp=lib%2FCatalyst%2FBase.pm;h=561fe9752a3539a5a8f645b7426649eaaebc6d1e;hp=863e68892cb128b59055db74ecf679b29c2a122b;hb=6d316c39ef09b94d094a157c501df80e3199ceae;hpb=e52ff674a44bb746cdd615dd3682dbdbdd3a31d5 diff --git a/lib/Catalyst/Base.pm b/lib/Catalyst/Base.pm index 863e688..561fe97 100644 --- a/lib/Catalyst/Base.pm +++ b/lib/Catalyst/Base.pm @@ -251,7 +251,7 @@ sub _parse_attrs { my $raw = $raw_attributes{$key}; - foreach my $value (ref($raw) ? @$raw : $raw) { + foreach my $value (ref($raw) eq 'ARRAY' ? @$raw : $raw) { my $meth = "_parse_${key}_attr"; if ( $self->can($meth) ) {