From a0766810f69b144d9a27b87c696b4703d6e5cce8 Mon Sep 17 00:00:00 2001 From: Don Armstrong Date: Fri, 29 Nov 2013 11:45:09 -0800 Subject: [PATCH] merge master --- Debbugs/Common.pm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) 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) { -- 2.39.2