From 9aa5a8448fab90e9253131322e03db3a7c832619 Mon Sep 17 00:00:00 2001
From: Romain d'Alverny <rdalverny@mandriva.org>
Date: Mon, 31 Jan 2005 16:20:46 +0000
Subject: Moved is_running to mdkonline.pm. Added is_running call to mdkupdate.

---
 mdkapplet | 10 +---------
 1 file changed, 1 insertion(+), 9 deletions(-)

(limited to 'mdkapplet')

diff --git a/mdkapplet b/mdkapplet
index c5afa29a..3dadad97 100755
--- a/mdkapplet
+++ b/mdkapplet
@@ -53,7 +53,7 @@ my $localfile = "$localdir/mdkonline";
 mkdir_p($localdir) if !-d $localdir;
 -e "$ENV{HOME}/.mdkonline" and system("mv", "$ENV{HOME}/.mdkonline", $localfile);
 
-is_running('mdkapplet') and die "mdkapplet already running\n";
+mdkonline::is_running('mdkapplet') and die "mdkapplet already running\n";
 
 my %state = (
 	     okay => {
@@ -294,14 +294,6 @@ sub compareWithInstalled {
     }
     $isUpdate
 }
-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;
-    } `ps -o '%P %p %c' -u $ENV{USER}`;
-}
 sub cronUpdate {
     Glib::Timeout->add(10*1000, sub {
 	checkConfig();
-- 
cgit v1.2.1