perl 5.003_06: ext/Opcode/Opcode.pm

Date: Fri, 20 Sep 1996 12:59:21 +0200
From: Gisle Aas <aas@bergen.sn.no>
Subject: Re: Symbol.pm clobbers $_ at startup

The same kind of problem seem to be present in Opcode.pm:

Date: Fri, 20 Sep 1996 15:08:33 +0100 (BST)
From: "Joseph S. Myers" <jsm28@hermes.cam.ac.uk>
Subject: Pod typos, pod2man bugs, and miscellaneous installation comments

Here is a patch for various typos and other defects in the Perl
5.003_05 pods, including the pods embedded in library modules.

diff --git a/ext/Opcode/Opcode.pm b/ext/Opcode/Opcode.pm
index 1714c48..1675d46 100644 (file)
--- a/ext/Opcode/Opcode.pm
+++ b/ext/Opcode/Opcode.pm
@@ -53,6 +53,7 @@ sub _init_optags {
     my(%all, %seen);
     @all{opset_to_ops(full_opset)} = (); # keys only
 
+    local($_);
     local($/) = "\n=cut"; # skip to optags definition section
     <DATA>;
     $/ = "\n=";                # now read in 'pod section' chunks
@@ -558,7 +559,7 @@ Originally designed and implemented by Malcolm Beattie,
 mbeattie@sable.ox.ac.uk as part of Safe version 1.
 
 Split out from Safe module version 1, named opcode tags and other
-changes added by Tim Bunce <Tim.Bunce@ig.co.uk>.
+changes added by Tim Bunce E<lt>F<Tim.Bunce@ig.co.uk>E<gt>.
 
 =cut