diff options
Diffstat (limited to 'converters/p5-Unicode-String/files/patch-String.pm')
| -rw-r--r-- | converters/p5-Unicode-String/files/patch-String.pm | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/converters/p5-Unicode-String/files/patch-String.pm b/converters/p5-Unicode-String/files/patch-String.pm new file mode 100644 index 000000000000..6f8c6f9d18f0 --- /dev/null +++ b/converters/p5-Unicode-String/files/patch-String.pm @@ -0,0 +1,12 @@ +--- String.pm~ Tue Mar 11 04:16:42 2003 ++++ String.pm Fri May 2 15:26:38 2003 +@@ -128,7 +128,8 @@ + # This is different from perl's normal behaviour by not letting + # a U+0030 ("0") be false. + my $self = shift; +- $$self ? 1 : ""; ++ my $a = $$self; ++ $a ? 1 : ""; + } + + |