From 52c117fb0e58af3f08746cc7c4da680f03fba4af Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Fri, 6 Jan 2012 00:07:42 +0000
Subject: (ask_for_X_restart,take_screenshot) do not fork useless shell

---
 perl-install/any.pm         | 2 +-
 perl-install/install/any.pm | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

(limited to 'perl-install')

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;
-- 
cgit v1.2.1