summaryrefslogtreecommitdiffstats
path: root/perl-install/printer
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-11-12 12:31:23 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-11-12 12:31:23 +0000
commit932b873787f546efa2629bc903988b40b04fb919 (patch)
tree1d3c42f85cdaeeef96e4c507fa09a8f1da804a55 /perl-install/printer
parent7639d230b844648b4d4b6d2ed00830c42a46b1e4 (diff)
downloaddrakx-932b873787f546efa2629bc903988b40b04fb919.tar
drakx-932b873787f546efa2629bc903988b40b04fb919.tar.gz
drakx-932b873787f546efa2629bc903988b40b04fb919.tar.bz2
drakx-932b873787f546efa2629bc903988b40b04fb919.tar.xz
drakx-932b873787f546efa2629bc903988b40b04fb919.zip
fix bogus use of old netwok module instead of network::network
Diffstat (limited to 'perl-install/printer')
-rw-r--r--perl-install/printer/printerdrake.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/printer/printerdrake.pm b/perl-install/printer/printerdrake.pm
index 5a85d2467..59abb72d2 100644
--- a/perl-install/printer/printerdrake.pm
+++ b/perl-install/printer/printerdrake.pm
@@ -5,7 +5,7 @@ use strict;
use common;
use modules;
-use network;
+use network::network;
use log;
use interactive;
use printer::main;
@@ -1247,7 +1247,7 @@ sub setup_smb {
} else {
die qq(The "smb://" URI must at least contain the server name and the share name!\n);
}
- if (network::is_ip($smbserver)) {
+ if (is_ip($smbserver)) {
$smbserverip = $smbserver;
$smbserver = "";
}
@@ -1336,7 +1336,7 @@ sub setup_smb {
not_edit => 1, format => \&translate, sort => 0,
allow_empty_list => 1, type => 'combo' }) ],
complete => sub {
- if (!network::is_ip($smbserverip) && $smbserverip ne "") {
+ if (!is_ip($smbserverip) && $smbserverip ne "") {
$in->ask_warn('', N("IP address should be in format 1.2.3.4"));
return (1,1);
}