From 7751869753257ce616936ab5911d009bd1741c25 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Tue, 31 Aug 2004 11:13:35 +0000
Subject: (is_running) try harder

---
 perl-install/standalone/net_applet | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install')

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() {
-- 
cgit v1.2.1