summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-08-31 11:26:23 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-08-31 11:26:23 +0000
commitd851348239c17eb51c8bc5ab87b4e33fea941b9f (patch)
tree49ea315fe0c85cff986110e5585c987319b6ae64 /perl-install
parent7fa0f6c69663e1acf5c725cf2c7506eebc53e336 (diff)
downloaddrakx-backup-do-not-use-d851348239c17eb51c8bc5ab87b4e33fea941b9f.tar
drakx-backup-do-not-use-d851348239c17eb51c8bc5ab87b4e33fea941b9f.tar.gz
drakx-backup-do-not-use-d851348239c17eb51c8bc5ab87b4e33fea941b9f.tar.bz2
drakx-backup-do-not-use-d851348239c17eb51c8bc5ab87b4e33fea941b9f.tar.xz
drakx-backup-do-not-use-d851348239c17eb51c8bc5ab87b4e33fea941b9f.zip
(is_running) make it work
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/standalone/net_applet3
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/standalone/net_applet b/perl-install/standalone/net_applet
index c5c359be7..66f6849e1 100644
--- a/perl-install/standalone/net_applet
+++ b/perl-install/standalone/net_applet
@@ -73,8 +73,7 @@ Gtk2->main;
ugtk2::exit(0);
sub is_running {
- my @pid = (grep { $_ !~ /^\s*$$\b/ } `ps -u $ENV{USER}`) =~ /\Q$_[0]/;
- @pid
+ grep { $_ !~ /^\s*$$\b/ && /\Q$_[0]/ } `ps -u $ENV{USER}`;
}
sub shouldStart() {
my %p = getVarsFromSh($onstartupfile);