diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-08-31 11:05:23 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-08-31 11:05:23 +0000 |
| commit | 80e3dec2622c3c1e00a34e357978e422ddd53e14 (patch) | |
| tree | cd79637fc07e6e76e7f47e7698b0256f2cb15383 /perl-install | |
| parent | 4b4a309611e8b1ef4fd34a6fbf7a9b03bf77db3b (diff) | |
| download | drakx-80e3dec2622c3c1e00a34e357978e422ddd53e14.tar drakx-80e3dec2622c3c1e00a34e357978e422ddd53e14.tar.gz drakx-80e3dec2622c3c1e00a34e357978e422ddd53e14.tar.bz2 drakx-80e3dec2622c3c1e00a34e357978e422ddd53e14.tar.xz drakx-80e3dec2622c3c1e00a34e357978e422ddd53e14.zip | |
(is_running) ignore our own process ... (brown paper bag bug)
Diffstat (limited to 'perl-install')
| -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 90f67e59f..64df7c963 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 = `ps -u $ENV{USER}` =~ /\Q$_[0]/; + my @pid = grep { $_ ne $$ } `ps -u $ENV{USER}` =~ /\Q$_[0]/; @pid } sub shouldStart() { |