Tim Waugh eb268d
diff -U0 foomatic-db-engine-3.0-20080211/ChangeLog.busyloop foomatic-db-engine-3.0-20080211/ChangeLog
Tim Waugh eb268d
diff -up foomatic-db-engine-3.0-20080211/lib/Foomatic/DB.pm.busyloop foomatic-db-engine-3.0-20080211/lib/Foomatic/DB.pm
Tim Waugh eb268d
--- foomatic-db-engine-3.0-20080211/lib/Foomatic/DB.pm.busyloop	2008-02-11 21:14:29.000000000 +0000
Tim Waugh eb268d
+++ foomatic-db-engine-3.0-20080211/lib/Foomatic/DB.pm	2008-09-02 13:19:24.000000000 +0100
Tim Waugh eb268d
@@ -4180,8 +4180,10 @@ EOFPGSZ
Tim Waugh eb268d
 	    # ShortNickName too long? Remove last words from model name.
Tim Waugh eb268d
 	    $parts{'model'} =~
Tim Waugh eb268d
 		s/(?<=[a-zA-Z0-9])[^a-zA-Z0-9]+[a-zA-Z0-9]*$//;
Tim Waugh eb268d
-	    $shortnickname =
Tim Waugh eb268d
+	    my $new =
Tim Waugh eb268d
 		"$parts{'make'} $parts{'model'}, $parts{'driver'}";
Tim Waugh eb268d
+	    last if ($new == $shortnickname);
Tim Waugh eb268d
+	    $shortnickname = $new;
Tim Waugh eb268d
 	}
Tim Waugh eb268d
 	if (length($shortnickname) > 31) {
Tim Waugh eb268d
 	    # If nothing else helps ...