From d58bdb4387919a2ee609d135c623b73167cecedf Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Sat, 28 Dec 2002 13:21:19 +0000
Subject: don't import everything from "common" (including MDK::Common::*) to
 get rid of warnings "Subroutine renamef redefined ..." "Subroutine linkf
 redefined ..." ... (but I don't understand how to make explainations on
 common_functs work?!)

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

diff --git a/perl-install/standalone.pm b/perl-install/standalone.pm
index 93a653305..607f4c9ab 100644
--- a/perl-install/standalone.pm
+++ b/perl-install/standalone.pm
@@ -2,7 +2,7 @@ package standalone; # $Id$
 
 use c;
 use strict;
-use common;
+use common qw(N);
 use Config;
 
 #- for sanity (if a use standalone is made during install, MANY problems will happen)
@@ -33,7 +33,7 @@ along with this program; if not, write to the Free Software
 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 ");
 
-my $progname = basename $0;
+my $progname = common::basename($0);
 
 my %usages = (
            'diskdrake' => "[--{" . join(",", qw(hd nfs smb dav removable fileshare)) . "}]",
-- 
cgit v1.2.1