diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-08-31 11:13:35 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-08-31 11:13:35 +0000 |
| commit | 7751869753257ce616936ab5911d009bd1741c25 (patch) | |
| tree | 34eb92bb3b73cad268c24efea003740b0398438d /perl-install/standalone | |
| parent | 80e3dec2622c3c1e00a34e357978e422ddd53e14 (diff) | |
| download | drakx-7751869753257ce616936ab5911d009bd1741c25.tar drakx-7751869753257ce616936ab5911d009bd1741c25.tar.gz drakx-7751869753257ce616936ab5911d009bd1741c25.tar.bz2 drakx-7751869753257ce616936ab5911d009bd1741c25.tar.xz drakx-7751869753257ce616936ab5911d009bd1741c25.zip | |
(is_running) try harder
Diffstat (limited to 'perl-install/standalone')
| -rw-r--r-- | perl-install/standalone/net_applet | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone/net_applet b/perl-install/standalone/net_applet index 64df7c963..c5c359be7 100644 --- a/perl-install/standalone/net_applet +++ b/perl-install/standalone/net_applet @@ -73,7 +73,7 @@ Gtk2->main; ugtk2::exit(0); sub is_running { - my @pid = grep { $_ ne $$ } `ps -u $ENV{USER}` =~ /\Q$_[0]/; + my @pid = (grep { $_ !~ /^\s*$$\b/ } `ps -u $ENV{USER}`) =~ /\Q$_[0]/; @pid } sub shouldStart() { |