diff options
| author | Thierry Vignaud <tv@mageia.org> | 2012-01-06 00:07:42 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mageia.org> | 2012-01-06 00:07:42 +0000 |
| commit | 52c117fb0e58af3f08746cc7c4da680f03fba4af (patch) | |
| tree | 45ec869a6ded64735a2dad7cfff9f5f9e2a3fd43 /perl-install | |
| parent | fe2a232f1cea03b357ecdc0ad9babee542a2868a (diff) | |
| download | drakx-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.pm | 2 | ||||
| -rw-r--r-- | perl-install/install/any.pm | 2 |
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; |