fix for older perls

James LewisMoss jimdres@mindspring.com
10 Jan 2001 19:07:32 -0500


Here's a patch for an older perl needing two argument mkdir.

Index: make-gnucash-patch.in
===================================================================
RCS file: /home/cvs/cvsroot/gnucash/make-gnucash-patch.in,v
retrieving revision 1.23
diff -u -b -r1.23 make-gnucash-patch.in
--- make-gnucash-patch.in	2000/12/27 23:37:49	1.23
+++ make-gnucash-patch.in	2001/01/11 00:03:41
@@ -64,7 +64,7 @@
     exit(1);
   }
   if (not -d "tmp") {
-    mkdir "tmp";
+    mkdir "tmp", 0755];
   }
   chdir "tmp";
   system("cvs -d `cat ../$new/CVS/Root` co gnucash");
@@ -110,7 +110,7 @@
 #unlink('gnc.diff', 'gnucash.diff.gz', 'gnucash.diff.gz.uue');
 
 if (not -d "diffs") {
-  mkdir "diffs";
+  mkdir "diffs", 0755;
 }
 
 my $date = `date '+%s'`;

-- 
@James LewisMoss <dres@debian.org>      |  Blessed Be!
@    http://jimdres.home.mindspring.com |  Linux is kewl!
@"Argue for your limitations and sure enough, they're yours." Bach