summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-12-28 13:21:19 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-12-28 13:21:19 +0000
commitd58bdb4387919a2ee609d135c623b73167cecedf (patch)
tree8f597ffd0bb36ed0f0c609f1714815ef7de76d4f /perl-install/standalone.pm
parente13398a7b50ab981d246b98890b40ecebed6de80 (diff)
downloaddrakx-d58bdb4387919a2ee609d135c623b73167cecedf.tar
drakx-d58bdb4387919a2ee609d135c623b73167cecedf.tar.gz
drakx-d58bdb4387919a2ee609d135c623b73167cecedf.tar.bz2
drakx-d58bdb4387919a2ee609d135c623b73167cecedf.tar.xz
drakx-d58bdb4387919a2ee609d135c623b73167cecedf.zip
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?!)
Diffstat (limited to 'perl-install/standalone.pm')
-rw-r--r--perl-install/standalone.pm4
1 files 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)) . "}]",