[Collab-qa-commits] r844 - ddpo-by-mail
lucas at alioth.debian.org
lucas at alioth.debian.org
Thu May 1 09:07:41 UTC 2008
Author: lucas
Date: 2008-05-01 09:07:40 +0000 (Thu, 01 May 2008)
New Revision: 844
Modified:
ddpo-by-mail/ddpo-config.rb
ddpo-by-mail/reminder-mail.rb
Log:
made text less verbose
Modified: ddpo-by-mail/ddpo-config.rb
===================================================================
--- ddpo-by-mail/ddpo-config.rb 2008-04-29 16:48:36 UTC (rev 843)
+++ ddpo-by-mail/ddpo-config.rb 2008-05-01 09:07:40 UTC (rev 844)
@@ -46,10 +46,10 @@
EXC_EMAILS_PKGS['pkg-xen-devel at lists.alioth.debian.org'] = ['xen-unstable']
EXC_EMAILS_PKGS['tomasera at debian.org'] = ['xinetd']
-BUG_AGE = 15
+BUG_AGE = 7
AGE_IN_DEBIAN = 20
-LAST_IN_SYNC = 30
-LAST_IN_SYNC_SERIOUS = 40
+LAST_IN_SYNC = 20
+LAST_IN_SYNC_SERIOUS = 30
# etch released on 2007-04-08. So
# (Date::today - Date::parse('2007-04-08')).to_i
Modified: ddpo-by-mail/reminder-mail.rb
===================================================================
--- ddpo-by-mail/reminder-mail.rb 2008-04-29 16:48:36 UTC (rev 843)
+++ ddpo-by-mail/reminder-mail.rb 2008-05-01 09:07:40 UTC (rev 844)
@@ -7,7 +7,7 @@
require 'dehs'
# fetch updated files from www
-update_data
+#update_data
# parse debian-installer packages
pkg = nil
@@ -107,13 +107,8 @@
gtext =<<-EOF
From: DDPOMail robot <lucas-ddpomail at debian.org>
To: "#{maintainers_name[email]}" <#{email}>
-Subject: Some of your Debian packages might need attention
+Subject: Possible problems in your Debian packages
-Dear #{maintainers_name[email]},
-
-The following possible problem(s) were detected in the package(s)
-you maintain in Debian:
-
EOF
maintainers_pkg[email].each do |pkg|
if pkg =~ /#/
@@ -129,12 +124,13 @@
# end
# exit 0
# end
+ dehstext = ''
mpkgs.keys.sort.each do |pkg|
next if issues[pkg].nil?
# skip if excluded
next if EXC_EMAILS_PKGS[email].include?(pkg)
if not mpkgs[pkg]
- comaint = ' (you co-maintain this package)'
+ comaint = ' (you co-maintain it)'
only_uploader = false if haslist[pkg].nil? and serious[pkg]
else
comaint = ''
@@ -142,32 +138,39 @@
end
mserious = mserious || serious[pkg]
ptext = "=== #{pkg}:#{comaint}\n"
+ incptext = false
testingpl = false
issues[pkg].each do |iss|
if iss[0] == :bugs
- ptext += "= This package has #{iss[1].length} bug(s) that should be fixed for the next Debian release:\n"
+ incptext = true
+ ptext += "= #{iss[1].length} bug(s) that should be fixed for the next Debian release:\n"
iss[1].each do |b|
ptext += "- ##{b[0]} <http://bugs.debian.org/#{b[0]}>\n"
ptext += " #{bugtitles[b[0]]}\n"
if b[2] == "RC"
- ptext += " This is a Release-Critical bug!\n"
+ # add nothing
elsif b[2] == "PROP"
# add nothing
else
- ptext += " Bug part of a release goal: #{b[2]}\n"
+ ptext += " Part of release goal: #{b[2]}\n"
end
end
elsif iss[0] == :not_testing
- ptext += "= This package has not been in testing for #{iss[2]} days.\n"
+ incptext = true
+ ptext += "= Not in testing for #{iss[2]} days.\n"
ptext += " If things don't change, it won't be part of lenny!\n"
testingpl = true
elsif iss[0] == :no_migration
- ptext += "= This package has not been able to migrate from unstable\n"
- ptext += " to testing for #{iss[2]} days.\n"
+ incptext = true
+ ptext += "= No migration to testing for #{iss[2]} days.\n"
testingpl = true
elsif iss[0] == :dehs
- ptext += "= A newer upstream version exists for this package (or your watch file\n is broken):\n"
- ptext += " upstream: #{iss[2]} Debian: #{iss[1]}\n"
+ if dehstext == ''
+ dehstext = <<-EOF
+=== Packages with a new upstream version according to DEHS:
+ EOF
+ end
+ dehstext += " #{pkg} #{iss[2]} (Debian: #{iss[1]})\n"
else
raise "Unknown issue #{iss[0]}!"
end
@@ -175,8 +178,10 @@
if testingpl
ptext += " See <http://release.debian.org/migration/testing.pl?package=#{pkg}>\n"
end
- gtext += ptext
- gtext += "\n"
+ if incptext
+ gtext += ptext
+ gtext += "\n"
+ end
end
if not mserious
puts "Skipping mail for #{email}, has only non-serious issues."
@@ -190,7 +195,12 @@
puts "Skipping mail for #{email}, IS EXCLUDED"
next
end
+ # add dehs text
+ if dehstext != ''
+ gtext += dehstext + "\n"
+ end
gtext += <<-EOF
+------------ interesting stuff probably ends here ------------
This is an automated mail. These mails are sent monthly.
For more information about these mails, refer to
http://wiki.debian.org/qa.debian.org/DdpoByMail
More information about the Collab-qa-commits
mailing list