From: Perl 5 Porters <perl5-porters@africa.nicoh.com>
Date: Wed, 10 Jul 1996 23:25:29 +0000 (+0000)
Subject: Delete old copy before generating new one
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=63eb108b0a1e0a9928bf7d5d48434a5e376da2aa;p=p5sagit%2Fp5-mst-13.2.git

Delete old copy before generating new one
---

diff --git a/makeaperl.SH b/makeaperl.SH
index 6af9419..d621e67 100644
--- a/makeaperl.SH
+++ b/makeaperl.SH
@@ -17,6 +17,7 @@ case "$0" in
 */*) cd `expr X$0 : 'X\(.*\)/'` ;;
 esac
 echo "Extracting makeaperl (with variable substitutions)"
+rm -f makeaperl
 $spitshell >makeaperl <<!GROK!THIS!
 $startperl
     eval 'exec perl -S \$0 "\$@"'