X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FCommon.pm;fp=Debbugs%2FCommon.pm;h=2e5132d677eb9bc4ac82c46de37e3772498a4ff2;hb=a0766810f69b144d9a27b87c696b4703d6e5cce8;hp=39f1de62f9d3757389b2ac660626e13953ab1b10;hpb=bb31bad8ad903297a4cb4453e7e8e8ed94d1f72a;p=debbugs.git

diff --git a/Debbugs/Common.pm b/Debbugs/Common.pm
index 39f1de6..2e5132d 100644
--- a/Debbugs/Common.pm
+++ b/Debbugs/Common.pm
@@ -497,8 +497,11 @@ sub __add_to_hash {
     binmode($fh,':encoding(UTF-8)');
     while (<$fh>) {
 	chomp;
-        next unless m/^(\S+)\s+(\S.*\S)\s*$/;
-        my ($key,$value)=($1,$2);
+        my @elements = split /\t/;
+        next unless @elements >=2;
+        # we do this because the source maintainer file contains the
+        # archive location, which we don't care about
+        my ($key,$value)=($elements[0],$elements[-1]);
 	$key = lc $key;
 	$forward->{$key}= $value;
 	if (defined $reverse) {