summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/printerdrake.pm11
1 files changed, 6 insertions, 5 deletions
diff --git a/perl-install/printerdrake.pm b/perl-install/printerdrake.pm
index 2d99858af..64945a796 100644
--- a/perl-install/printerdrake.pm
+++ b/perl-install/printerdrake.pm
@@ -706,7 +706,7 @@ complete => sub {
# Auto-detect printer model (works if host is an ethernet-connected
# printer)
- my $modelinfo = detect_devices::getSNMPModel ($remotehost);
+ my $modelinfo = printer::getSNMPModel ($remotehost);
my $auto_hpoj;
if ((defined($modelinfo)) && ($modelinfo->{MANUFACTURER} ne "")) {
$in->ask_warn('', _("Detected model: %s %s",
@@ -1131,11 +1131,10 @@ sub setup_socket {
$in->do_pkgs->install('nc');
}
- # Auto-detect printer model (works if host is an ethernet-connected
- # printer)
+ # Auto-detect printer model
my $modelinfo = undef;
if ($printer->{AUTODETECT}) {
- $modelinfo = detect_devices::getSNMPModel ($remotehost);
+ $modelinfo = printer::getSNMPModel ($remotehost);
}
my $auto_hpoj;
if ((defined($modelinfo)) && ($modelinfo->{MANUFACTURER} ne "")) {
@@ -1220,7 +1219,7 @@ complete => sub {
# Auto-detect printer model (works if host is an ethernet-connected
# printer)
my $remotehost = $1;
- my $modelinfo = detect_devices::getSNMPModel ($remotehost);
+ my $modelinfo = printer::getSNMPModel ($remotehost);
my $auto_hpoj;
if ((defined($modelinfo)) && ($modelinfo->{MANUFACTURER} ne "")) {
$in->ask_warn('', _("Detected model: %s %s",
@@ -1355,6 +1354,7 @@ sub setup_common {
# Configure photo card access with mtools and MToolsFM
if ((($makemodel =~ /HP\s+PhotoSmart/i) ||
($makemodel =~ /HP\s+PSC\s*9[05]0/i) ||
+ ($makemodel =~ /HP\s+PSC\s*22\d\d/i) ||
($makemodel =~ /HP\s+OfficeJet\s+D\s*1[45]5/i)) &&
($makemodel !~ /HP\s+PhotoSmart\s+7150/i)) {
# Install mtools and MToolsFM
@@ -2376,6 +2376,7 @@ sub photocard_help {
my $ptaldevice = $1;
if ((($makemodel =~ /HP\s+PhotoSmart/i) ||
($makemodel =~ /HP\s+PSC\s*9[05]0/i) ||
+ ($makemodel =~ /HP\s+PSC\s*22\d\d/i) ||
($makemodel =~ /HP\s+OfficeJet\s+D\s*1[45]5/i)) &&
($makemodel !~ /HP\s+PhotoSmart\s+7150/i)) {
# Models with built-in photo card drives