From aad4f3618528dd48f1ccac7eaa85a5a2c2784b16 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 21 Aug 2001 10:23:28 +0000 Subject: umask=0 only if security level < 3 --- perl-install/fs.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install') diff --git a/perl-install/fs.pm b/perl-install/fs.pm index 3562f3cf1..493dc2ca6 100644 --- a/perl-install/fs.pm +++ b/perl-install/fs.pm @@ -271,7 +271,7 @@ sub mount_options_help { } sub set_default_options { - my ($all_hds, $useSupermount, $iocharset, $codepage) = @_; + my ($all_hds, $useSupermount, $security, $iocharset, $codepage) = @_; my @removables = @{$all_hds->{raw_hds}}; @@ -304,7 +304,7 @@ sub set_default_options { } if (isFat($part) || $is_auto) { put_in_hash($options, { - user => 1, 'umask=0' => 1, exec => 1, + user => 1, 'umask=0' => $security < 3, exec => 1, 'iocharset=' => $iocharset, 'codepage=' => $codepage, }); } -- cgit v1.2.1