diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-12-28 13:21:19 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-12-28 13:21:19 +0000 |
commit | d58bdb4387919a2ee609d135c623b73167cecedf (patch) | |
tree | 8f597ffd0bb36ed0f0c609f1714815ef7de76d4f /perl-install/standalone.pm | |
parent | e13398a7b50ab981d246b98890b40ecebed6de80 (diff) | |
download | drakx-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.pm | 4 |
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)) . "}]", |