diff options
| author | Yves Orton <demerphq@gmail.com> | 2005-12-17 19:52:00 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-12-18 10:23:55 +0000 |
| commit | 538f996c62318eccc7409ecba802831611739437 (patch) | |
| tree | 702abff1ce46eca4afb4b1e96f6a1e88741e803a /patchlevel.h | |
| parent | e9e3be284fa3b373520899b5109edb0548c7d833 (diff) | |
| download | perl-538f996c62318eccc7409ecba802831611739437.tar.gz | |
Make script embedded in patchlevel.h work on win32.
Message-ID: <9b18b3110512171052h2052d598rdf038f1d38560317@mail.gmail.com>
p4raw-id: //depot/perl@26397
Diffstat (limited to 'patchlevel.h')
| -rw-r--r-- | patchlevel.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/patchlevel.h b/patchlevel.h index 5b118cf3af..af6e18f49b 100644 --- a/patchlevel.h +++ b/patchlevel.h @@ -100,6 +100,7 @@ while (<PLIN>) { } close PLOUT or die "Couldn't close filehandle writing to patchlevel.new : $!"; close PLIN or die "Couldn't close filehandle reading from patchlevel.h : $!"; +close DATA; # needed to allow unlink to work win32. unlink "patchlevel.bak" or warn "Couldn't unlink patchlevel.bak : $!" if -e "patchlevel.bak"; rename "patchlevel.h", "patchlevel.bak" or |