opcode.pl is chmod'ing the original source tree

Message-ID: <20010613212013.D98663@plum.flirble.org>

p4raw-id: //depot/perl@10580

diff --git a/opcode.pl b/opcode.pl
index f897bb9..ffdc93d 100755 (executable)
--- a/opcode.pl
+++ b/opcode.pl
@@ -1,6 +1,5 @@
 #!/usr/bin/perl
 
-chmod 0666, "opcode.h", "opnames.h";
 unlink "opcode.h", "opnames.h";
 open(OC, ">opcode.h") || die "Can't create opcode.h: $!\n";
 open(ON, ">opnames.h") || die "Can't create opnames.h: $!\n";