[SCM] Debian package checker branch, master, updated. 2.1.3-17-g3dc5876

[Russ Allbery]

The following commit has been merged in the master branch:
commit a969085f2a78d2caffd8b07efa483ee666bdc877
Author: Russ Allbery <r...@debian.org>
Date:   Mon Dec 29 14:57:51 2008 -0800

    Process the archive in sorted order
    
    * frontend/lintian:
      + [RA] When processing the entire archive, do so in sorted order.
    
    This helps when watching the full archive lintian.d.o run to tell where it
    is in the archive.
    
    Also remove some debugging code that doesn't make sense to me.

diff --git a/debian/changelog b/debian/changelog
index 55ab596..d485642 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -36,6 +36,9 @@ lintian (2.1.4) UNRELEASED; urgency=low
     + [RA] New check-tag target which runs all test cases in the new test
       suite that check for or against a particular tag.
 
+  * frontend/lintian:
+    + [RA] When processing the entire archive, do so in sorted order.
+
   * private/update-never-seen:
     + [RA] Merge data from both test suites and use the tag files for the
       old test suite rather than relying on runtests -v.
diff --git a/frontend/lintian b/frontend/lintian
index 4b96d52..ea4bc34 100755
--- a/frontend/lintian
+++ b/frontend/lintian
@@ -1251,26 +1251,23 @@ if ($check_everything) {
     read_udeb_list("$LINTIAN_LAB/info/udeb-packages", 0);
 
     debug_msg(2, "pkg_mode = $pkg_mode");
-    for my $arg (keys %source_info) {
-       debug_msg(2, keys %source_info);
-    }
 
     if (($pkg_mode eq 'a') or ($pkg_mode eq 's')) {
-       for my $arg (keys %source_info) {
+       for my $arg (sort keys %source_info) {
            debug_msg(1, "doing stuff with 
$LINTIAN_ARCHIVEDIR/$source_info{$arg}->{'file'}");
            $schedule->add_file('s', 
"$LINTIAN_ARCHIVEDIR/$source_info{$arg}->{'file'}",
                                %{$source_info{$arg}});
        }
     }
     if (($pkg_mode eq 'a') or ($pkg_mode eq 'b')) {
-       for my $arg (keys %binary_info) {
+       for my $arg (sort keys %binary_info) {
            debug_msg(1, "doing stuff with 
$LINTIAN_ARCHIVEDIR/$binary_info{$arg}->{'file'}");
            $schedule->add_file('b', 
"$LINTIAN_ARCHIVEDIR/$binary_info{$arg}->{'file'}",
                                %{$binary_info{$arg}});
        }
     }
     if (($pkg_mode eq 'a') or ($pkg_mode eq 'u')) {
-       for my $arg (keys %udeb_info) {
+       for my $arg (sort keys %udeb_info) {
            debug_msg(1, "doing stuff with 
$LINTIAN_ARCHIVEDIR/$udeb_info{$arg}->{'file'}");
            $schedule->add_file('u', 
"$LINTIAN_ARCHIVEDIR/$udeb_info{$arg}->{'file'}",
                                %{$udeb_info{$arg}});

-- 
Debian package checker


-- 
To UNSUBSCRIBE, email to debian-lint-maint-requ...@lists.debian.org
with a subject of "unsubscribe". Trouble? Contact listmas...@lists.debian.org