X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=patchlevel.h;h=0950cbcd0ddc760b596017b4120d500d8d59da08;hb=37c25af0ec94b55a9d5be380e5f1703e0afca56b;hp=5b118cf3afd40d5d9da63bbd82d6df66b1a6a31a;hpb=69c7f29429723a0fefb4c8c01f5406c96beb31dc;p=p5sagit%2Fp5-mst-13.2.git diff --git a/patchlevel.h b/patchlevel.h index 5b118cf..0950cbc 100644 --- a/patchlevel.h +++ b/patchlevel.h @@ -1,7 +1,7 @@ /* patchlevel.h * * Copyright (C) 1993, 1995, 1996, 1997, 1998, 1999, - * 2000, 2001, 2002, 2003, 2004, by Larry Wall and others + * 2000, 2001, 2002, 2003, 2004, 2005, 2006, by Larry Wall and others * * You may distribute under the terms of either the GNU General Public * License or the Artistic License, as specified in the README file. @@ -100,6 +100,7 @@ while () { } 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 @@ -114,14 +115,9 @@ hunk. */ -#ifndef PERL_PATCHNUM -#define PERL_PATCHNUM 24148 -#endif - #if !defined(PERL_PATCHLEVEL_H_IMPLICIT) && !defined(LOCAL_PATCH_COUNT) static const char * const local_patches[] = { NULL - ,"DEVEL" STRINGIFY(PERL_PATCHNUM) ,NULL };