[Debian-l10n-commits] r1129 - /dl10n/trunk/lib/Debian/L10n/Spider.pm

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

Author: nekral-guest
Date: Tue Aug  5 01:59:22 2008
New Revision: 1129

URL: http://svn.debian.org/wsvn/?sc=1&rev=1129
Log:
The most recent status line is the last one, not the first one.

Modified:
    dl10n/trunk/lib/Debian/L10n/Spider.pm

Modified: dl10n/trunk/lib/Debian/L10n/Spider.pm
URL: http://svn.debian.org/wsvn/dl10n/trunk/lib/Debian/L10n/Spider.pm?rev=1129&op=diff
==============================================================================
--- dl10n/trunk/lib/Debian/L10n/Spider.pm (original)
+++ dl10n/trunk/lib/Debian/L10n/Spider.pm Tue Aug  5 01:59:22 2008
@@ -677,10 +677,12 @@
 					}
 					$db->add_status($pkg, $type, $file, $date, $status, $translator, $list, $url, ($bug_nb || ""));
 					print "Insert $pkg: $type#$file#$date#$status#$translator#$list#$url#".($bug_nb ? "$bug_nb" : "")."\n";
+
 					if ($status eq 'bts') {
 						# Check the status of the bug with the last status line.
 						# This will set the bug to status to DONE if the bug is an old one.
-						check_bts_bug_soap ($db, 0, $pkg, $db->status($pkg)->[0]);
+						my @statuslist = @{$db->status($pkg)};
+						check_bts_bug_soap ($db, 0, $pkg, pop @statuslist);
 					}
 				}
 			} continue {