diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2001-04-09 10:03:22 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2001-04-09 10:03:22 +0000 |
| commit | 5d31c1b8727635cae94e9502888b8653e66e9ef9 (patch) | |
| tree | 322ce292544d17e680f487915b2505501d2c9a14 /perl-install | |
| parent | 012e3e72df8606c8a323852a518c82b29dc0a21e (diff) | |
| download | drakx-5d31c1b8727635cae94e9502888b8653e66e9ef9.tar drakx-5d31c1b8727635cae94e9502888b8653e66e9ef9.tar.gz drakx-5d31c1b8727635cae94e9502888b8653e66e9ef9.tar.bz2 drakx-5d31c1b8727635cae94e9502888b8653e66e9ef9.tar.xz drakx-5d31c1b8727635cae94e9502888b8653e66e9ef9.zip | |
(main): log the umask
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install2.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm index 437d90b2c..762e1c814 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -546,6 +546,7 @@ 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}); }; |