Change 18875 by [EMAIL PROTECTED] on 2003/03/10 05:31:00
Remove the foo-old files.
Affected files ...
... //depot/perl/opcode.pl#103 edit
Differences ...
==== //depot/perl/opcode.pl#103 (xtext) ====
Index: perl/opcode.pl
--- perl/opcode.pl#102~18851~ Fri Mar 7 22:49:35 2003
+++ perl/opcode.pl Sun Mar 9 21:31:00 2003
@@ -336,6 +336,12 @@
safer_rename $pp_proto_new, 'pp_proto.h';
safer_rename $pp_sym_new, 'pp.sym';
+END {
+ foreach ('opcode.h', 'opnames.h', 'pp_proto.h', 'pp.sym') {
+ 1 while unlink "$_-old";
+ }
+}
+
###########################################################################
sub tab {
local($l, $t) = @_;
End of Patch.
