[devscripts] 03/05: rc-alert: Automatically determine what the ignore tag means

[James McCoy]

This is an automated email from the git hooks/post-receive script.

jamessan pushed a commit to branch master
in repository devscripts.

commit bd06b2c1408bbfb1e7cc565bf63f8b1c386e0e5f
Author: James McCoy <jamessan at debian.org>
Date:   Tue Jan 14 20:09:08 2014 -0500

    rc-alert: Automatically determine what the ignore tag means
    
    Signed-off-by: James McCoy <jamessan at debian.org>
---
 debian/changelog    | 2 ++
 scripts/rc-alert.pl | 4 +++-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/debian/changelog b/debian/changelog
index 09b3e90..b3d0ab0 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -8,6 +8,8 @@ devscripts (2.13.10) UNRELEASED; urgency=low
   * licensecheck: Add handling for a variation of 3 clause BSD.
   * rc-alert:
     + Ensure the tag/dist description order is stable.  (Closes: #735286)
+    + Automatically determine what the ignore tag means, instead of
+      hard-coding dist names.
 
  -- Jakub Wilk <jwilk at debian.org>  Fri, 27 Dec 2013 18:39:11 +0100
 
diff --git a/scripts/rc-alert.pl b/scripts/rc-alert.pl
index 8f1f5aa..1e49755 100755
--- a/scripts/rc-alert.pl
+++ b/scripts/rc-alert.pl
@@ -46,7 +46,6 @@ my @flags = (
     [qr/R/ => 'unreproducible'],
     [qr/S/ => 'security'],
     [qr/U/ => 'upstream'],
-    [qr/I/ => 'wheezy-ignore or squeeze-ignore'],
 );
 # A little hacky but allows us to sort the list by length
 my @dists = (
@@ -268,6 +267,9 @@ my $html;
     $html = <BUGS>;
 }
 
+my ($ignore) = $html =~ m%<strong>I</strong>: ([^<]*)%;
+push(@flags, [qr/I/ => $ignore]);
+
 my @stanzas = $html =~ m%<div class="package">(.*?)</div>%gs;
 my %pkg_store;
 foreach my $stanza (@stanzas) {

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/collab-maint/devscripts.git