[Debian-l10n-commits] r2702 - in /dl10n/trunk: Changelog dl10n-nmu

[nekral-guest at users.alioth.debian.org]

Author: nekral-guest
Date: Sun Jul 24 23:11:40 2011
New Revision: 2702

URL: http://svn.debian.org/wsvn/?sc=1&rev=2702
Log:
	* dl10n-nmu: The BTS may not know the maintainer of all packages.

Modified:
    dl10n/trunk/Changelog
    dl10n/trunk/dl10n-nmu

Modified: dl10n/trunk/Changelog
URL: http://svn.debian.org/wsvn/dl10n/trunk/Changelog?rev=2702&op=diff
==============================================================================
--- dl10n/trunk/Changelog (original)
+++ dl10n/trunk/Changelog Sun Jul 24 23:11:40 2011
@@ -1,3 +1,7 @@
+2011-07-25  Nicolas François  <nicolas.francois at centraliens.net>
+
+	* dl10n-nmu: The BTS may not know the maintainer of all packages.
+
 2011-07-25  Nicolas François  <nicolas.francois at centraliens.net>
 
 	* dl10n-html, lib/Debian/L10n/Html.pm, lib/Debian/L10n/Utils.pm:

Modified: dl10n/trunk/dl10n-nmu
URL: http://svn.debian.org/wsvn/dl10n/trunk/dl10n-nmu?rev=2702&op=diff
==============================================================================
--- dl10n/trunk/dl10n-nmu (original)
+++ dl10n/trunk/dl10n-nmu Sun Jul 24 23:11:40 2011
@@ -55,7 +55,7 @@
   next if $soap_status->{$bug_nb}->{done};
   next if $soap_status->{$bug_nb}->{archived};
   my $pkg = $soap_status->{$bug_nb}->{source};
-  $pkg = $soap_status->{$bug_nb}->{package} unless defined $pkg;
+  $pkg = $soap_status->{$bug_nb}->{package} unless (defined $pkg and $pkg ne "");
   my $date = $soap_status->{$bug_nb}->{date};
   #these packages are skipped in the database
   next if ($pkg =~ /(kde-i18n|wordtrans|kernel-image-2\.4\.27-m68k|manpages|debian-med|pptpd)/);
@@ -126,8 +126,12 @@
     $packages->{$pkg}->{class} = "nodebconf";
   }
   $packages->{$pkg}->{maintainer} = $data->maintainer($pkg) unless defined $packages->{$pkg}->{maintainer};
-  $packages->{$pkg}->{maintainer} =~ s/</</g;
-  $packages->{$pkg}->{maintainer} =~ s/>/>/g;
+  if (defined $packages->{$pkg}->{maintainer}) {
+    $packages->{$pkg}->{maintainer} =~ s/</</g;
+    $packages->{$pkg}->{maintainer} =~ s/>/>/g;
+  } else {
+  $packages->{$pkg}->{maintainer} = "(unknown)";
+  }
 }