X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst.pm;h=d3880e667137fcaa908d7a822d3fa0dab51c0b30;hp=958e0052b0b9f6693db1f5301c375e25d11b28e1;hb=7d670fb446850f89dc7ee626cda155e72320732e;hpb=b4429ab4789a7b2c3060bbe584edc9185d77c765 diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm index 958e005..d3880e6 100644 --- a/lib/Catalyst.pm +++ b/lib/Catalyst.pm @@ -3071,6 +3071,7 @@ sub _handle_unicode_decoding { return unless defined $value; + ## I think this mess is to support the old nested if ( ref $value eq 'ARRAY' ) { foreach ( @$value ) { $_ = $self->_handle_unicode_decoding($_); @@ -3090,6 +3091,8 @@ sub _handle_unicode_decoding { sub _handle_param_unicode_decoding { my ( $self, $value ) = @_; + return unless defined $value; # not in love with just ignoring undefs - jnap + my $enc = $self->encoding; return try { Encode::is_utf8( $value ) ?