From 80e3dec2622c3c1e00a34e357978e422ddd53e14 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 31 Aug 2004 11:05:23 +0000 Subject: (is_running) ignore our own process ... (brown paper bag bug) --- perl-install/standalone/net_applet | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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() { -- cgit v1.2.1