[Collab-qa-commits] r1432 - ddpo-by-mail

[Raphael Geissert]

Author: atomo64-guest
Date: 2009-04-19 23:56:12 +0000 (Sun, 19 Apr 2009)
New Revision: 1432

Modified:
   ddpo-by-mail/Makefile
   ddpo-by-mail/reminder-mail.rb
Log:
Get the list of packages with an RM request from qa.d.o, not in a hackish way


Modified: ddpo-by-mail/Makefile
===================================================================
--- ddpo-by-mail/Makefile	2009-04-19 07:30:53 UTC (rev 1431)
+++ ddpo-by-mail/Makefile	2009-04-19 23:56:12 UTC (rev 1432)
@@ -1,6 +1,6 @@
 #!/usr/bin/make -f
 
-UPDATE_TARGETS:=bts2ldap_fullindex ddpo_packages ddpo_maintainers testing-status.raw dehs.txt ood_excuses.txt pts_subscriptions.txt
+UPDATE_TARGETS:=bts2ldap_fullindex ddpo_packages ddpo_maintainers testing-status.raw dehs.txt ood_excuses.txt pts_subscriptions.txt wnpp_rm
 WGET_OPTIONS:=-nv -N
 WGET:=wget $(WGET_OPTIONS)
 DATA_DIR:=data
@@ -30,6 +30,9 @@
 pts_subscriptions.txt:
 	ssh master /org/packages.qa.debian.org/bin/get-summary-subscribers.pl > $@
 
+wnpp_rm:
+	$(WGET) http://qa.debian.org/data/bts/wnpp_rm
+
 clean: clean-update
 	# remove broken symlinks:
 	find -L $(DATA_DIR) -type l -exec unlink '{}' ';'

Modified: ddpo-by-mail/reminder-mail.rb
===================================================================
--- ddpo-by-mail/reminder-mail.rb	2009-04-19 07:30:53 UTC (rev 1431)
+++ ddpo-by-mail/reminder-mail.rb	2009-04-19 23:56:12 UTC (rev 1432)
@@ -75,7 +75,13 @@
 
 
 # get removals
-rms = `lynx -dump 'http://bugs.debian.org/cgi-bin/pkgreport.cgi?pkg=ftp.debian.org;dist=unstable' |grep RM | awk '{print $4}'`.chomp.split(/\n/).map { |e| e.chomp(',') }
+rms = []
+IO::read('data/wnpp_rm').each_line do |l|
+  if l =~ /\bRM\b/
+    pkg, rest = l.chomp.split(':')
+    rms.push(pkg)
+  end
+end
 
 bugs, bugtitles = parse_bugs
 testingissues = testing_issues(dipkgs)