r19343 - /scripts/svn-tag-pending-bugs

[dmn at users.alioth.debian.org]

Author: dmn
Date: Fri May  2 22:30:23 2008
New Revision: 19343

URL: http://svn.debian.org/wsvn/?sc=1&rev=19343
Log:
svn-tag-pending-bugs: send mail to nnnn@ too so that maintainer(s) get notified; previously only bug submitter got the full log

Modified:
    scripts/svn-tag-pending-bugs

Modified: scripts/svn-tag-pending-bugs
URL: http://svn.debian.org/wsvn/scripts/svn-tag-pending-bugs?rev=19343&op=diff
==============================================================================
--- scripts/svn-tag-pending-bugs (original)
+++ scripts/svn-tag-pending-bugs Fri May  2 22:30:23 2008
@@ -55,7 +55,14 @@
 $msg->add('X-Mailer', (basename $0).' running on '.hostname_long);
 $msg->add('X-Svn-Repository', $repo_path);
 
-$msg->to( join(', ', map( "$_-submitter\@bugs.debian.org", @bugs )) );
+$msg->to(
+    join(
+        ', ',
+        map(
+            ("$_\@bugs.debian.org", "$_-submitter\@bugs.debian.org"),
+            @bugs )
+    )
+);
 
 my $out = $msg->open();
 $out->print("tag $_ + pending\n") foreach @bugs;