summaryrefslogtreecommitdiffstats
path: root/perl-install/printer.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/printer.pm')
-rw-r--r--perl-install/printer.pm2
1 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/printer.pm b/perl-install/printer.pm
index 524a8ae0e..21098df37 100644
--- a/perl-install/printer.pm
+++ b/perl-install/printer.pm
@@ -288,6 +288,8 @@ sub read_printer_db(;$) {
}
}
delete $available_devices{''};
+ @available_devices{qw/POSTSCRIPT TEXT/} = (); #- these are always available.
+ close AVAIL;
local $_; #- use of while (<...
local *DBPATH; #- don't have to do close ... and don't modify globals at least