diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/printer/main.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/perl-install/printer/main.pm b/perl-install/printer/main.pm index d692f79d9..a099eac69 100644 --- a/perl-install/printer/main.pm +++ b/perl-install/printer/main.pm @@ -2282,6 +2282,11 @@ sub configure_hpoj { } # No, it is not an HP multi-function device. return "" if !$device_ok; + + # If $model_long and $serialnumber_long stay empty, fill them with + # $model and $serialnumber + $model_long ||= $model; + $serialnumber_long ||= $serialnumber; # Determine the ptal device name from already existing config files my $ptalprefix = |