From 3913f75a8c7d164dd1c855a778ea56d2911c90a0 Mon Sep 17 00:00:00 2001
From: Till Kamppeter <tkamppeter@mandriva.com>
Date: Sun, 2 Mar 2003 16:36:55 +0000
Subject: Correction on reading the Foomatic overview.

---
 perl-install/printer/main.pm | 20 ++++++++------------
 1 file changed, 8 insertions(+), 12 deletions(-)

diff --git a/perl-install/printer/main.pm b/perl-install/printer/main.pm
index 2a7f46c4f..76a0f74aa 100644
--- a/perl-install/printer/main.pm
+++ b/perl-install/printer/main.pm
@@ -427,18 +427,14 @@ sub read_printer_db(;$) {
 		    } elsif (m!^\s*<ieee1284>\s*([^<>]+)\s*</ieee1284>\s*$!) {
 			# Full ID string
 			my $idstr = $1;
-			$idstr =~ m!(MFG|MANUFACTURER):([^;]+);!i;
-			$entry->{devidmake} = $2;
-			undef $2;
-			$idstr =~ m!(MDL|MODEL):([^;]+);!i;
-			$entry->{devidmodel} = $2;
-			undef $2;
-			$idstr =~ m!(DES|DESCRIPTION):([^;]+);!i;
-			$entry->{deviddesc} = $2;
-			undef $2;
-			$idstr =~ m!(CMD|COMMAND\s*SET):([^;]+);!i;
-			$entry->{devidcmdset} = $2;
-			undef $2;
+			$idstr =~ m!(MFG|MANUFACTURER):([^;]+);!i
+			    and $entry->{devidmake} = $2;
+			$idstr =~ m!(MDL|MODEL):([^;]+);!i
+			    and $entry->{devidmodel} = $2;
+			$idstr =~ m!(DES|DESCRIPTION):([^;]+);!i
+			    and $entry->{deviddesc} = $2;
+			$idstr =~ m!(CMD|COMMAND\s*SET):([^;]+);!i
+			    and $entry->{devidcmdset} = $2;
 		    }
 		} else {
 		    if (m!^.*</autodetect>\s*$!) {
-- 
cgit v1.2.1