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/install/any.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/install')

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