don't need use MDK::Common... when we have "use common" (which is the standard for libDrakX modules)

12 files changed, 1 insertions, 13 deletions

diff --git a/perl-install/commands.pm b/perl-install/commands.pm
index fd709d5c7..b15b0a596 100644
--- a/perl-install/commands.pm
+++ b/perl-install/commands.pm
@@ -15,7 +15,6 @@ use vars qw($printable_chars *ROUTE *DF *PS);
 #-######################################################################################
 #- misc imports
 #-######################################################################################
-use MDK::Common::System;
 use common;
 
 #-######################################################################################
diff --git a/perl-install/common.pm b/perl-install/common.pm
index 1933975e5..3e7a2443d 100644
--- a/perl-install/common.pm
+++ b/perl-install/common.pm
@@ -1,7 +1,6 @@
 package common; # $Id$
 
 use MDK::Common;
-use MDK::Common::System;
 use diagnostics;
 use strict;
 use run_program;
diff --git a/perl-install/crypto.pm b/perl-install/crypto.pm
index 23b4dc93f..8ce2974c9 100644
--- a/perl-install/crypto.pm
+++ b/perl-install/crypto.pm
@@ -5,7 +5,6 @@ use strict;
 
 use vars qw(%url2land %land2tzs %static_mirrors %mirrors);
 
-use MDK::Common::System;
 use common;
 use log;
 use ftp;
diff --git a/perl-install/fs.pm b/perl-install/fs.pm
index 5ba4d68ad..7b2ea6c51 100644
--- a/perl-install/fs.pm
+++ b/perl-install/fs.pm
@@ -3,8 +3,6 @@ package fs; # $Id$
 use diagnostics;
 use strict;
 
-use MDK::Common::System;
-use MDK::Common::Various;
 use common;
 use log;
 use devices;
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index 0d7bda1c2..7c7ec4605 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -11,7 +11,6 @@ our @EXPORT_OK = map { @$_ } values %EXPORT_TAGS;
 #-######################################################################################
 #- misc imports
 #-######################################################################################
-use MDK::Common::System;
 use common;
 use run_program;
 use fs::type;
diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm
index 483792895..324fe3442 100644
--- a/perl-install/interactive.pm
+++ b/perl-install/interactive.pm
@@ -6,7 +6,6 @@ use strict;
 #-######################################################################################
 #- misc imports
 #-######################################################################################
-use MDK::Common::Func;
 use common;
 use do_pkgs;
 
diff --git a/perl-install/network/isdn.pm b/perl-install/network/isdn.pm
index 35c287d2c..766769504 100644
--- a/perl-install/network/isdn.pm
+++ b/perl-install/network/isdn.pm
@@ -8,7 +8,6 @@ use run_program;
 use log;
 use network::tools;
 use MDK::Common::Globals "network", qw($in);
-use MDK::Common::File;
 use services;
 
 
diff --git a/perl-install/network/test.pm b/perl-install/network/test.pm
index 2ba8538c6..ec680b7a3 100644
--- a/perl-install/network/test.pm
+++ b/perl-install/network/test.pm
@@ -1,7 +1,7 @@
 package network::test;          # $Id$
 
 use strict;
-use MDK::Common;
+use common;
 use run_program;
 use Socket;
 
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 2f8dd48dd..19ac4f1d7 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -2,7 +2,6 @@ package pkgs; # $Id$
 
 use strict;
 
-use MDK::Common::System;
 use URPM;
 use URPM::Resolve;
 use URPM::Signature;
diff --git a/perl-install/resize_fat/main.pm b/perl-install/resize_fat/main.pm
index 726875837..ed81363b7 100644
--- a/perl-install/resize_fat/main.pm
+++ b/perl-install/resize_fat/main.pm
@@ -7,7 +7,6 @@ use strict;
 
 use log;
 use common;
-use MDK::Common::System;
 use resize_fat::boot_sector;
 use resize_fat::info_sector;
 use resize_fat::directory;
diff --git a/perl-install/security/msec.pm b/perl-install/security/msec.pm
index e4b9da561..4258653ef 100644
--- a/perl-install/security/msec.pm
+++ b/perl-install/security/msec.pm
@@ -1,7 +1,6 @@
 package security::msec;
 
 use strict;
-use MDK::Common::File;
 use MDK::Common;
 
 
diff --git a/perl-install/standalone/drakTermServ b/perl-install/standalone/drakTermServ
index 73ebfed33..11f916f0d 100755
--- a/perl-install/standalone/drakTermServ
+++ b/perl-install/standalone/drakTermServ
@@ -26,7 +26,6 @@ use ugtk2 qw(:helpers :wrappers :create);
 use common;
 use run_program;
 use bootloader;
-use MDK::Common::File qw(:all);
 
 use Config;
 use POSIX;