lintian: r1121 - trunk/frontend

[rra@debian.org]

Author: rra
Date: 2008-01-06 02:24:24 +0100 (Sun, 06 Jan 2008)
New Revision: 1121

Modified:
   trunk/frontend/lintian-info
Log:
Fix lintian-info for normal situations (a bug I introduced with annotate
support).


Modified: trunk/frontend/lintian-info
===================================================================
--- trunk/frontend/lintian-info	2008-01-06 01:17:21 UTC (rev 1120)
+++ trunk/frontend/lintian-info	2008-01-06 01:24:24 UTC (rev 1121)
@@ -82,6 +82,9 @@
     if ($annotate) {
         $type = shift @pieces if ($pieces[0] =~ /^\w$/);
         $pkg = shift @pieces if ($pieces[0] =~ /^\S+( (binary|udeb))?$/);
+    } else {
+	$type = shift @pieces;
+	$pkg = shift @pieces;
     }
     if ($annotate or (defined $type and $type =~ m/^[OEWIX]$/)) {
 	my $tag = shift @pieces;