From 08b3094733e0885c4fc9fb87f9cb8d3c3a66091d Mon Sep 17 00:00:00 2001
From: Olivier Blin <oblin@mandriva.org>
Date: Wed, 20 Jul 2005 04:40:17 +0000
Subject: use $0 instead of hardcoded path

---
 perl-install/standalone/net_applet | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

(limited to 'perl-install/standalone/net_applet')

diff --git a/perl-install/standalone/net_applet b/perl-install/standalone/net_applet
index 6b140c4c2..ccb5169b2 100644
--- a/perl-install/standalone/net_applet
+++ b/perl-install/standalone/net_applet
@@ -25,7 +25,6 @@ my $onstartupfile = "$ENV{HOME}/.net_applet";
 add_icon_path("/usr/share/libDrakX/pixmaps/");
 # Allow multiple instances, but only one per user:
 is_running('net_applet') and die "net_applet already running\n";
-my $prog_name = "/usr/bin/net_applet";
 
 my $net = {};
 my $watched_interface;
@@ -182,10 +181,9 @@ sub cronNetwork() {
                                   });
 }
 sub cronUpdate() {
-    my $current_md5 = common::md5file($prog_name);
+    my $current_md5 = common::md5file($0);
     $update_timeout = Glib::Timeout->add(60000, sub {
-        my $new_md5 = common::md5file($prog_name);
-        $new_md5 ne $current_md5 and  exec($prog_name);
+        common::md5file($0) ne $current_md5 and exec($0);
     });
 }
 sub go2State {
-- 
cgit v1.2.1