From 2032e3f8b59dbbdec2912c24e0a3afad9f604a40 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 6 Jan 2003 10:01:52 +0000 Subject: put full data in all variants of the data structure --- perl-install/printer/data.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/printer/data.pm') diff --git a/perl-install/printer/data.pm b/perl-install/printer/data.pm index 4caf40f94..8813af515 100644 --- a/perl-install/printer/data.pm +++ b/perl-install/printer/data.pm @@ -94,6 +94,6 @@ our %spoolers = ('pdq' => { ] } ); -our %spooler_inv = map { $spoolers{$_}{long_name} => $_ } keys %spoolers; +our %spooler_inv = map { $spoolers{$_}{long_name} => $spoolers{$_} } keys %spoolers; -our %shortspooler_inv = map { $spoolers{$_}{short_name} => $_ } keys %spoolers; +our %shortspooler_inv = map { $spoolers{$_}{short_name} => $spoolers{$_} } keys %spoolers; -- cgit v1.2.1