summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/lsnetdrake
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2007-04-25 12:26:16 +0000
committerPascal Rigaux <pixel@mandriva.com>2007-04-25 12:26:16 +0000
commit126777bc019a54afb4ec51299f2cf9d2841698aa (patch)
tree97f76e571902ead55ba138f1156a4b4f00b9b779 /perl-install/standalone/lsnetdrake
parentf1f67448efc714873378dfeb8279fae68054a90a (diff)
downloaddrakx-126777bc019a54afb4ec51299f2cf9d2841698aa.tar
drakx-126777bc019a54afb4ec51299f2cf9d2841698aa.tar.gz
drakx-126777bc019a54afb4ec51299f2cf9d2841698aa.tar.bz2
drakx-126777bc019a54afb4ec51299f2cf9d2841698aa.tar.xz
drakx-126777bc019a54afb4ec51299f2cf9d2841698aa.zip
Diffstat (limited to 'perl-install/standalone/lsnetdrake')
-rwxr-xr-xperl-install/standalone/lsnetdrake6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/standalone/lsnetdrake b/perl-install/standalone/lsnetdrake
index d6233209d..41fcd3b30 100755
--- a/perl-install/standalone/lsnetdrake
+++ b/perl-install/standalone/lsnetdrake
@@ -2,8 +2,8 @@
use lib qw(/usr/lib/libDrakX);
use standalone;
-use network::nfs;
-use network::smb;
+use fs::remote::nfs;
+use fs::remote::smb;
use MDK::Common::Func qw(if_);
"@ARGV" =~ /-h/ and die "usage: lsnetdrake [-h] [--nfs] [--smb]\n";
@@ -14,7 +14,7 @@ my $smb = !@ARGV || "@ARGV" =~ /-(smb)/;
$| = 1;
$ENV{PATH} = "/sbin:/usr/sbin:$ENV{PATH}";
-foreach my $class (if_($nfs, network::nfs->new), if_($smb, network::smb->new)) {
+foreach my $class (if_($nfs, fs::remote::nfs->new), if_($smb, fs::remote::smb->new)) {
foreach my $server (sort_names($class->find_servers)) {
foreach (sort_names(eval { $class->find_exports($server) })) {
print $class->to_fullstring($_), "\n";