update Changes, tweak Porting/makerel

p4raw-id: //depot/maint-5.005/perl@1711

1 files changed, 5 insertions, 1 deletions

diff --git a/Porting/makerel b/Porting/makerel
index 72005b4841..f2e1f9750b 100644
--- a/Porting/makerel
+++ b/Porting/makerel
@@ -80,7 +80,7 @@ $cmd = "awk '{print \$1}' MANIFEST | cpio -pdm $relroot/$reldir";
 system($cmd) == 0 or die "$cmd failed";
 print "\n";
 
-chdir $relroot or die $!;
+chdir "$relroot/$reldir" or die $!;
 
 print "Setting file permissions...\n";
 system("find . -type f -print     | xargs chmod -w");
@@ -106,6 +106,8 @@ my @exe = qw(
     Porting/makerel
 );
 system("chmod +x @exe");
+
+print "Adding CRs to DOSish files...\n";
 my @crlf = qw(
     djgpp/configure.bat
     README.dos
@@ -116,6 +118,8 @@ my @crlf = qw(
 system("perl -pi -e 's/\$/\\r/' @crlf");
 print "\n";
 
+chdir ".." or die $!;
+
 print "Creating and compressing the tar file...\n";
 my $src = (-e $perl) ? $perl : 'perl'; # 'perl' in maint branch
 $cmd = "tar cf - $reldir | gzip --best > $reldir.tar.gz";