lintian: r310 - trunk/lib

[djpig@debian.org]

Author: djpig
Date: 2004-07-01 19:54:03 +0200 (Thu, 01 Jul 2004)
New Revision: 310

Modified:
   trunk/lib/Util.pm
Log:
My last commit was broken. Ignore leading whitespace in fields if it is
there


Modified: trunk/lib/Util.pm
===================================================================
--- trunk/lib/Util.pm	2004-07-01 17:08:08 UTC (rev 309)
+++ trunk/lib/Util.pm	2004-07-01 17:54:03 UTC (rev 310)
@@ -92,7 +92,7 @@
 	    $last_tag = $tag;
 	}
 	# new field?
-	elsif (m/^(\S+):(.*)$/o) {
+	elsif (m/^(\S+):\s*(.*)$/o) {
 	    $open_section = 1;
 
 	    my ($tag,$value) = (lc $1,$2);