summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-01-06 00:07:42 +0000
committerThierry Vignaud <tv@mageia.org>2012-01-06 00:07:42 +0000
commit52c117fb0e58af3f08746cc7c4da680f03fba4af (patch)
tree45ec869a6ded64735a2dad7cfff9f5f9e2a3fd43 /perl-install
parentfe2a232f1cea03b357ecdc0ad9babee542a2868a (diff)
downloaddrakx-52c117fb0e58af3f08746cc7c4da680f03fba4af.tar
drakx-52c117fb0e58af3f08746cc7c4da680f03fba4af.tar.gz
drakx-52c117fb0e58af3f08746cc7c4da680f03fba4af.tar.bz2
drakx-52c117fb0e58af3f08746cc7c4da680f03fba4af.tar.xz
drakx-52c117fb0e58af3f08746cc7c4da680f03fba4af.zip
(ask_for_X_restart,take_screenshot) do not fork useless shell
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/any.pm2
-rw-r--r--perl-install/install/any.pm2
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index c2bc318b2..4867dbb78 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -1498,7 +1498,7 @@ sub ask_for_X_restart {
if (!$wm) {
# no window manager, ctrl-alt-del may not be supported, but we still have to restart X..
$in->ask_okcancel('', N("You need to logout and back in again for changes to take effect. Press OK to logout now."), 1) or return;
- system('killall Xorg');
+ system('killall', 'Xorg');
}
else {
$in->ask_okcancel('', N("You need to log out and back in again for changes to take effect"), 1) or return;
diff --git a/perl-install/install/any.pm b/perl-install/install/any.pm
index ef2d3add3..431deae97 100644
--- a/perl-install/install/any.pm
+++ b/perl-install/install/any.pm
@@ -1242,7 +1242,7 @@ sub take_screenshot {
}
my $nb = 1;
$nb++ while -e "$dir/$nb.png";
- system("fb2png /dev/fb0 $dir/$nb.png 0");
+ system('fb2png', '/dev/fb0', "$dir/$nb.png", '0');
if (!$warned && !$nowarn) {
$warned = 1;