[Collab-qa-commits] r1978 - retitle-old-ita-itp

[Lucas Nussbaum]

Author: lucas
Date: 2011-07-27 20:31:38 +0000 (Wed, 27 Jul 2011)
New Revision: 1978

Modified:
   retitle-old-ita-itp/retitle-old-ita-itp.rb
Log:
add blacklist for ron and adconrad

Modified: retitle-old-ita-itp/retitle-old-ita-itp.rb
===================================================================
--- retitle-old-ita-itp/retitle-old-ita-itp.rb	2011-07-27 18:12:46 UTC (rev 1977)
+++ retitle-old-ita-itp/retitle-old-ita-itp.rb	2011-07-27 20:31:38 UTC (rev 1978)
@@ -7,7 +7,9 @@
 
 ita_months = 6
 itp_months = 6
+BLACKLIST = Regexp.union(/^ron at debian.org$/, /^adconrad@/)
 
+
 really_mail = true
 
 
@@ -70,7 +72,7 @@
 #### old ITP
 
 dbh = DBI::connect('DBI:Pg:dbname=udd;port=5441;host=localhost', 'guest')
-sth = dbh.prepare("select id, arrival, owner, title, last_modified from bugs
+sth = dbh.prepare("select id, arrival, owner, title, last_modified, submitter_email from bugs
             where package='wnpp' and title ~ 'ITP:'
             and last_modified < current_date - interval '#{itp_months} months' and done = ''
             and id not in (select id from bugs_merged_with where id > merged_with)")
@@ -78,6 +80,7 @@
 rows.each do |r|
   id = r['id']
   subject = r['title']
+  next if r['submitter_email'] =~ BLACKLIST
   next if subject !~ /^ITP: ([^ ]+) /
   source  = $1
   newsub = subject.gsub(/^ITP: /, 'RFP: ')