diff options
Diffstat (limited to 'solenv')
| -rw-r--r-- | solenv/bin/modules/installer/simplepackage.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/solenv/bin/modules/installer/simplepackage.pm b/solenv/bin/modules/installer/simplepackage.pm index 23b9983a6eb5..30f41e43f6ff 100644 --- a/solenv/bin/modules/installer/simplepackage.pm +++ b/solenv/bin/modules/installer/simplepackage.pm @@ -652,10 +652,10 @@ sub create_simple_package my $target = $onelink->{'Target'}; my $destination = $subfolderdir . $installer::globals::separator . $onelink->{'destination'}; - my $localcall = "ln -sf \'$target\' \'$destination\' \>\/dev\/null 2\>\&1"; - system($localcall); + my @localcall = ('ln', '-sf', $target, $destination); + system(@localcall) == 0 or die "system @localcall failed: $?"; - $infoline = "Creating Unix link: \"ln -sf $target $destination\"\n"; + $infoline = "Creating Unix link: \"@localcall\"\n"; push(@installer::globals::logfileinfo, $infoline); } |