diff options
| author | Till Kamppeter <tkamppeter@mandriva.com> | 2002-08-27 15:04:18 +0000 |
|---|---|---|
| committer | Till Kamppeter <tkamppeter@mandriva.com> | 2002-08-27 15:04:18 +0000 |
| commit | 0cee2445f80d2d87ad3113826e2d6e6f25bdaba8 (patch) | |
| tree | b975a1c0e4794d96458e4a58ae401f349f3ca333 /perl-install | |
| parent | 61a7dd269aefe8d237ae3540561d681455f4815d (diff) | |
| download | drakx-backup-do-not-use-0cee2445f80d2d87ad3113826e2d6e6f25bdaba8.tar drakx-backup-do-not-use-0cee2445f80d2d87ad3113826e2d6e6f25bdaba8.tar.gz drakx-backup-do-not-use-0cee2445f80d2d87ad3113826e2d6e6f25bdaba8.tar.bz2 drakx-backup-do-not-use-0cee2445f80d2d87ad3113826e2d6e6f25bdaba8.tar.xz drakx-backup-do-not-use-0cee2445f80d2d87ad3113826e2d6e6f25bdaba8.zip | |
- Bug fix: s/detect_devices::getSNMPModel/printer::getSNMPModel/
- Added support for the photo card reader in the HP PSC 2200 series.
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/printerdrake.pm | 11 |
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 |