[PATCH] fix MANIFEST perms & add case-insensitive exclude

---
 Porting/add-package.pl |    4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/Porting/add-package.pl b/Porting/add-package.pl
index 20947c0..6a07d7e 100644
--- a/Porting/add-package.pl
+++ b/Porting/add-package.pl
@@ -12,7 +12,7 @@ getopts( 'r:p:e:vudn', $Opts );
 
 my $Cwd         = cwd(); 
 my $Verbose     = 1;
-my $ExcludeRe   = $Opts->{e} ? qr/$Opts->{e}/ : undef;
+my $ExcludeRe   = $Opts->{e} ? qr/$Opts->{e}/i : undef;
 my $Debug       = $Opts->{v} || 0;
 my $RunDiff     = $Opts->{d} || 0;
 my $PkgDir      = $Opts->{p} || cwd();
@@ -439,7 +439,7 @@ my @ChangedFiles;
 
     push @manifest, values %pkg_files;
 
-    {   chmod 0755, $file;
+    {   chmod 0644, $file;
         open my $fh, ">$file" or die "Could not open $file for writing: $!";
         #print $fh sort { lc $a cmp lc $b } @manifest;
         ### XXX stolen from pod/buildtoc:sub do_manifest
-- 
1.5.6.3

• [PATCH] fix MANIFEST perms & add case-insensitive exclude by David Golden
• Re: [PATCH] fix MANIFEST perms & add case-insensitive exclude by H.Merijn Brand