diff options
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() { |