From: chromatic <chromatic@wgz.org>
Date: Wed, 5 Sep 2001 18:08:07 +0000 (-0600)
Subject: Re: [PATCH] Re: English.pm should do *PREMATCH = \$`
X-Git-Tag: accepted/trunk/20130322.191538~30398
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=ab063544b9b830d646a880f1404f8327afb8f9c6;p=platform%2Fupstream%2Fperl.git

Re: [PATCH] Re: English.pm should do *PREMATCH = \$`
Message-Id: <01090518080700.19590@firewheel>

p4raw-id: //depot/perl@11896
---

diff --git a/lib/English.pm b/lib/English.pm
index 3f22306..5383368 100644
--- a/lib/English.pm
+++ b/lib/English.pm
@@ -183,6 +183,8 @@ sub import {
 	*CHILD_ERROR				= \$?	;
 	*OS_ERROR				= \$!	;
 	    *ERRNO				= \$!	;
+	*OS_ERROR				= \%!	;
+	    *ERRNO				= \%!	;
 	*EXTENDED_OS_ERROR			= \$^E	;
 	*EVAL_ERROR				= \$@	;