diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/standalone/net_applet | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/standalone/net_applet b/perl-install/standalone/net_applet index 631872574..6b140c4c2 100644 --- a/perl-install/standalone/net_applet +++ b/perl-install/standalone/net_applet @@ -126,8 +126,7 @@ sub is_running { my ($name) = @_; any { my ($ppid, $pid, $n) = /^\s*(\d+)\s+(\d+)\s+(.*)/; - #- to run ps, perl may create some process with $name as name and 1 as ppid - $ppid != 1 && $pid != $$ && $n eq $name; + $pid != $$ && $n eq $name; } `ps -o '%P %p %c' -u $ENV{USER}`; } sub shouldStart() { |