Changeset 4134

Timestamp:

2003-04-14T08:47:33+12:00 (21 years ago)

Author:

mdewsnip

Message:

Changed main.cfg to be rewritten as world-writeable.

File:

• trunk/gsdl/bin/script/translator.pl (modified) (1 diff)

trunk/gsdl/bin/script/translator.pl

@@ -211 +211 @@
     }
 
-    # Add the new language code into the main.cfg file
-    open MAIN_CFG_OUT, ">$maincfgfile.new" or die "Error: Could not write $maincfgfile.new\n";
+    # Add the new language code into the main.cfg file, and make sure it is world writeable
+    my $currentmask = umask;
+    umask(0000);
+    if (! open(MAIN_CFG_OUT,">$maincfgfile.new")) {
+    umask($currentmask);
+    die "Error: Could not create $maincfgfile.new: $!\n";
+    }
+    umask($currentmask);
+
     open MAIN_CFG_IN, "<$maincfgfile" or die "Error: Could not open $maincfgfile.\n";
     my $inmacros = "false";