From a6f5badbd4ab6f34b5340a45c7a6557395eddc89 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 12 Sep 2000 09:41:04 +0000 Subject: no_comment --- perl-install/Xconfigurator.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'perl-install/Xconfigurator.pm') diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm index a64e924c5..ff9c39491 100644 --- a/perl-install/Xconfigurator.pm +++ b/perl-install/Xconfigurator.pm @@ -1126,7 +1126,7 @@ sub main { if ($::isStandalone && $0 =~ /Xdrakres/) { my $found; foreach (@window_managers) { - if (`pidof $_` > 0) { + if (`pidof "$_"` > 0) { if ($in->ask_okcancel('', _("Please relog into %s to activate the changes", ucfirst $_), 1)) { system("kwmcom logout") if /kwm/; system("dcop kdesktop default logout") if /kwin/; @@ -1138,8 +1138,8 @@ sub main { c::setsid(); exec qw(perl -e), q{ my $wm = shift; - for (my $nb = 30; $nb && `pidof $wm` > 0; $nb--) { sleep 1 } - system("killall X") unless `pidof $wm` > 0; + for (my $nb = 30; $nb && `pidof "$wm"` > 0; $nb--) { sleep 1 } + system("killall X") unless `pidof "$wm"` > 0; }, $_; } $found = 1; last; -- cgit v1.2.1