From: Nicholas Clark <nick@ccl4.org>
Date: Fri, 9 Feb 2007 12:20:49 +0000 (+0000)
Subject: Update the lists of files that makerel needs to process. Remove the
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=f78a30bae32aa7bf7b34243912f3d37c1f110e00;p=p5sagit%2Fp5-mst-13.2.git

Update the lists of files that makerel needs to process. Remove the
"used only once" warning.

p4raw-id: //depot/perl@30178
---

diff --git a/Porting/makerel b/Porting/makerel
index d4022bb..bb56375 100644
--- a/Porting/makerel
+++ b/Porting/makerel
@@ -27,7 +27,6 @@ $patchlevel = $1 if $patchlevel_h =~ /PERL_VERSION\s+(\d+)/;
 $subversion = $1 if $patchlevel_h =~ /PERL_SUBVERSION\s+(\d+)/;
 die "Unable to parse patchlevel.h" unless $subversion >= 0;
 $vers = sprintf("%d.%d.%d", $revision, $patchlevel, $subversion);
-$vms_vers = sprintf("%d_%d_%d", $revision, $patchlevel, $subversion);
 
 # fetch list of local patches
 my (@local_patches, @lpatch_tags, $lpatch_tags);
@@ -57,10 +56,6 @@ die "Aborted.\n" if @$missentry or @$missfile;
 print "\n";
 
 # VMS no longer has hardcoded version numbers descrip.mms
-#print "Updating VMS version specific files with $vms_vers...\n";
-#system("perl -pi -e 's/^\QPERL_VERSION = \E\d\_\d+(\s*\#)/PERL_VERSION = $vms_vers$1/' vms/descrip.mms");
-
-
 
 print "Creating $relroot/$reldir release directory...\n";
 die "$relroot/$reldir release directory already exists\n"   if -e "$relroot/$reldir";
@@ -92,7 +87,6 @@ my @exe = qw(
     installman
     keywords.pl
     opcode.pl
-    perly.fixer
     t/TEST
     *.SH
     vms/ext/Stdio/test.pl
@@ -128,8 +122,6 @@ my @writables = qw(
     pod/perlapi.pod
     perlapi.h
     perlapi.c
-    ext/ByteLoader/byterun.h
-    ext/ByteLoader/byterun.c
     ext/B/B/Asmdata.pm
     ext/Devel/PPPort/PPPort.xs
     ext/Devel/PPPort/module2.c
@@ -137,15 +129,12 @@ my @writables = qw(
     regnodes.h
     warnings.h
     lib/warnings.pm
-    vms/perly_c.vms
-    vms/perly_h.vms
     win32/Makefile
+    win32/Makefile.ce
     win32/makefile.mk
     win32/config_H.bc
     win32/config_H.gc
     win32/config_H.vc
-    wince/config_H.ce
-    wince/Makefile.ce
 );
 system("chmod +w @writables") == 0
     or die "system: $!";
@@ -163,11 +152,12 @@ my @crlf = qw(
     symbian/README
     symbian/xsbuild.pl
     win32/Makefile
+    win32/Makefile.ce
+    win32/ce-helpers/compile-all.bat
+    win32/ce-helpers/compile.bat
+    win32/ce-helpers/registry.bat
+    win32/distclean.bat
     win32/makefile.mk
-    wince/Makefile.ce
-    wince/compile-all.bat
-    wince/README.perlce
-    wince/registry.bat
 );
 system("perl -pi -e 's/\\015*\\012/\\015\\012/' @crlf") == 0
     or die "system: $!";