From 0c167ef013a2db3232079721e82ba4cbc2ebff7d Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <[email protected]> Date: Wed, 30 Nov 2016 10:52:48 +0100 Subject: Delete unused patch
--- ....86-Fix-panic-when-encoding-undef-scalars.patch | 47 ---------------------- 1 file changed, 47 deletions(-) delete mode 100644 Encode-2.86-Fix-panic-when-encoding-undef-scalars.patch diff --git a/Encode-2.86-Fix-panic-when-encoding-undef-scalars.patch b/Encode-2.86-Fix-panic-when-encoding-undef-scalars.patch deleted file mode 100644 index 4e522c2..0000000 --- a/Encode-2.86-Fix-panic-when-encoding-undef-scalars.patch +++ /dev/null @@ -1,47 +0,0 @@ -From 519fb7e761447245fed9bb2de02e894b71ccae2f Mon Sep 17 00:00:00 2001 -From: Vincent van Dam <[email protected]> -Date: Thu, 22 Sep 2016 14:48:05 +0200 -Subject: [PATCH] Fix panic when encoding undef scalars -MIME-Version: 1.0 -Content-Type: text/plain; charset=UTF-8 -Content-Transfer-Encoding: 8bit - -Signed-off-by: Petr Písař <[email protected]> ---- - lib/Encode/Encoder.pm | 4 +++- - t/undef.t | 8 ++++++++ - 2 files changed, 11 insertions(+), 1 deletion(-) - create mode 100644 t/undef.t - -diff --git a/lib/Encode/Encoder.pm b/lib/Encode/Encoder.pm -index 23e0349..fef4e9b 100644 ---- a/lib/Encode/Encoder.pm -+++ b/lib/Encode/Encoder.pm -@@ -85,7 +85,9 @@ sub AUTOLOAD { - from_to( $self->{data}, $self->{encoding}, $obj->name, 1 ); - } - else { -- $self->{data} = $obj->encode( $self->{data}, 1 ); -+ if ( defined($self->{data}) ) { -+ $self->{data} = $obj->encode( $self->{data}, 1 ); -+ } - } - $self->{encoding} = $obj->name; - return $self; -diff --git a/t/undef.t b/t/undef.t -new file mode 100644 -index 0000000..ad8bcd6 ---- /dev/null -+++ b/t/undef.t -@@ -0,0 +1,8 @@ -+use Encode::Encoder qw(encoder); -+ -+use Test::More; -+plan tests => 1; -+ -+my $emptyutf8; -+eval { $c = encoder($emptyutf8)->utf8; }; -+ok(!$@,"crashed encoding undef variable ($@)"); --- -2.7.4 - -- cgit v0.12 http://pkgs.fedoraproject.org/cgit/perl-Encode.git/commit/?h=f25&id=0c167ef013a2db3232079721e82ba4cbc2ebff7d _______________________________________________ perl-devel mailing list -- [email protected] To unsubscribe send an email to [email protected]
