diff options
| author | 0000-Admin <root@egg.karlov.mff.cuni.cz> | 2001-06-20 16:11:49 +0200 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-21 13:46:50 +0000 |
| commit | 791b4ad3d4885818274b272624d60d233f36ad2d (patch) | |
| tree | 0f3eb1e1423e3ee78f6918ecd085309e6f98b0db /installman | |
| parent | 669d0086c4868c605ac0871f6bb102e428db4873 (diff) | |
| download | perl-791b4ad3d4885818274b272624d60d233f36ad2d.tar.gz | |
[ID 20010621.002] UnixWare 7.1.1 and Perl-5.6.1 problems
Message-Id: <200106201211.f5KCBnm24320@egg.karlov.mff.cuni.cz>
Setting umask to something friendlier.
p4raw-id: //depot/perl@10783
Diffstat (limited to 'installman')
| -rwxr-xr-x | installman | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/installman b/installman index dad91820cf..6e00774845 100755 --- a/installman +++ b/installman @@ -11,6 +11,10 @@ use subs qw(unlink chmod rename link); use vars qw($packlist @modpods); require Cwd; +if ($Config{d_umask}) { + umask(022); # umasks like 077 aren't that useful for installations +} + $ENV{SHELL} = 'sh' if $^O eq 'os2'; my $ver = $Config{version}; # Not used presently. |