diff options
| author | Mathieu Arnold <mat@FreeBSD.org> | 2003-09-02 14:02:05 +0000 |
|---|---|---|
| committer | Mathieu Arnold <mat@FreeBSD.org> | 2003-09-02 14:02:05 +0000 |
| commit | 958ed52f8911aef3b670034e965b66e1fd7ba13e (patch) | |
| tree | a325359c6115193489a0cfcfa33d37e78766b919 /converters/p5-Unicode-String/files | |
| parent | 3a5cf2c8c4e432f46482d8a71826cc19b1bdec6c (diff) | |
Notes
Diffstat (limited to 'converters/p5-Unicode-String/files')
| -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 : ""; + } + + |