[Collab-qa-commits] r1577 - udd/web/cgi-bin

[Lucas Nussbaum]

Author: lucas
Date: 2009-09-06 19:57:25 +0000 (Sun, 06 Sep 2009)
New Revision: 1577

Modified:
   udd/web/cgi-bin/bugs-removed-packages.cgi
Log:
improve bugs-removed-packages based on feedback from Marco

Modified: udd/web/cgi-bin/bugs-removed-packages.cgi
===================================================================
--- udd/web/cgi-bin/bugs-removed-packages.cgi	2009-09-06 18:14:18 UTC (rev 1576)
+++ udd/web/cgi-bin/bugs-removed-packages.cgi	2009-09-06 19:57:25 UTC (rev 1577)
@@ -22,9 +22,12 @@
 
 sth = dbh.prepare <<-EOF
 SELECT source, package, id from bugs
-where not affects_unstable and not affects_testing and not affects_stable
-and source not in (select source from sources where distribution='debian' and release in ('squeeze', 'sid', 'experimental'))
-and source not in (#{PSEUDO_PKGS.map { |p| "'#{p}'"}.join(",")})
+where not affects_unstable and not affects_testing
+and not affects_stable and not affects_experimental
+and not exists (
+select * from bugs_packages where bugs_packages.id = bugs.id and bugs_packages.source in (select source from sources where distribution='debian' and release in ('lenny', 'squeeze', 'sid', 'experimental')))
+and not exists (select * from bugs_packages where bugs_packages.id = bugs.id
+and source in (#{PSEUDO_PKGS.map { |p| "'#{p}'"}.join(",")}))
 and not package ~ '^(linux|kernel)-(image|source)-'
 and status != 'done'
 order by source, id