diff options
| author | Jordan Ayers <jordan.ayers@gmail.com> | 2010-11-07 18:02:12 -0600 |
|---|---|---|
| committer | Norbert Thiebaud <nthiebaud@gmail.com> | 2010-11-08 00:06:36 -0600 |
| commit | b8fcb346da138e302d94a23d127e7df9a88ef7fe (patch) | |
| tree | 5493cf05fb3c2a78ae682b2df1daaee06143a419 /solenv/bin/modules/installer/parameter.pm | |
| parent | b67ab60bd680a31967834c64953ecb53f72b0619 (diff) | |
Perl Installer: Use built-in chmod
Replace several system calls which performed single-file permission sets with the built-in chmod command.
Diffstat (limited to 'solenv/bin/modules/installer/parameter.pm')
| -rw-r--r-- | solenv/bin/modules/installer/parameter.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/solenv/bin/modules/installer/parameter.pm b/solenv/bin/modules/installer/parameter.pm index dd7361c37af8..4cb366f826af 100644 --- a/solenv/bin/modules/installer/parameter.pm +++ b/solenv/bin/modules/installer/parameter.pm @@ -449,8 +449,7 @@ sub setglobalvariables if ( $installer::globals::compiler =~ /^unxmac/ ) { - my $localcall = "chmod 777 $installer::globals::temppath \>\/dev\/null 2\>\&1"; - system($localcall); + chmod 0777, $installer::globals::temppath; } $installer::globals::temppath = $installer::globals::temppath . $installer::globals::separator . "i"; |