From b2f4aa5858588095829660094a6f9c12a1883445 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 9 Apr 2001 13:22:22 +0000
Subject: (main): sets umask (seems like default one is no more 022, kernel
 change?)

---
 perl-install/install2.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/install2.pm')

diff --git a/perl-install/install2.pm b/perl-install/install2.pm
index 762e1c814..b6995e80b 100644
--- a/perl-install/install2.pm
+++ b/perl-install/install2.pm
@@ -343,6 +343,7 @@ sub main {
 		       install_steps_auto_install::errorInStep();
 		   };
     $ENV{PERL_BADLANG} = 1;
+    umask 022;
 
     $::isInstall = 1;
     $::expert = $::g_auto_install = 0;
@@ -546,7 +547,6 @@ sub main {
     MAIN: for ($o->{step} = $o->{steps}{first};; $o->{step} = getNextStep()) {
 	$o->{steps}{$o->{step}}{entered}++;
 	$o->enteringStep($o->{step});
-	log::l("umask is ", umask());
 	eval {
 	    &{$install2::{$o->{step}}}($clicked, $o->{steps}{$o->{step}}{entered});
 	};
-- 
cgit v1.2.1