[SCM] Debian package checker branch, master, updated. 1.24.3-23-gb28190b

["Jordà Polo" <jorda@ettin.org>]

The following commit has been merged in the master branch:
commit 5bce28597aca699825482014699d28a9dbd115a5
Author: Jordà Polo <jorda@ettin.org>
Date:   Mon Aug 11 10:26:04 2008 +0200

    Add support for debconf-spec and lintian references
    
    The output is now sorted too, to avoid unnecessarily diff lines when new
    manuals are added.

diff --git a/private/manual_refs_update.pl b/private/manual_refs_update.pl
index 00dd84a..dadace8 100755
--- a/private/manual_refs_update.pl
+++ b/private/manual_refs_update.pl
@@ -60,6 +60,11 @@ my %manuals = (
         'http://www.debian.org/doc/packaging-manuals/python-policy/',
         $link_re, $fields
     ],
+    'lintian' => [
+        '/usr/share/doc/lintian/lintian.html/index.html',
+        'http://lintian.debian.org/manual/',
+        $link_re, $fields
+    ],
     'devref' => [
         '/usr/share/doc/developers-reference/index.html',
         'http://www.debian.org/doc/developers-reference/',
@@ -70,6 +75,12 @@ my %manuals = (
         'http://www.debian.org/doc/packaging-manuals/menu.html/',
         $index_re, $fields
     ],
+    'debconf-spec' => [
+        '/usr/share/doc/debian-policy/debconf_specification.html',
+        'http://www.debian.org/doc/packaging-manuals/debconf_specification.html',
+        qr/<a href="(#.+?)">([\w\s[:punct:]]+?)<\/a>/,
+        [ [ 'section', 'url' ], [ 'title' ] ]
+    ],
     # Extract chapters only, since the HTML available in netfort.gr.jp isn't
     # exactly the same with regards to section IDs as the version included in
     # the package.
@@ -89,7 +100,7 @@ my %manuals = (
 
 # Collect all possible references from available manuals.
 
-for my $manual (keys %manuals) {
+for my $manual (sort keys %manuals) {
     my ($index, $url, $ref_re, $fields) = @{$manuals{$manual}};
     my $title = 0;
 
@@ -122,6 +133,7 @@ for my $manual (keys %manuals) {
 
             $ref{section} =~ s/^\#(.+)$/\L$1/;
             $ref{title} =~ s/\n//g;
+            $ref{title} =~ s/\s+/ /g;
             $ref{url} = "$url$ref{url}";
             my @out = ( $manual, $ref{section}, $ref{title}, $ref{url} );
             print join('::', @out) . "\n";

-- 
Debian package checker