------------------------------------------------------------ revno: 897 committer: Debian BTS <debb...@rietz> branch nick: mainline timestamp: Tue 2009-08-18 19:24:44 +0000 message: merge changes from dla source ------------------------------------------------------------ revno: 738.3.166 committer: Don Armstrong <d...@donarmstrong.com> branch nick: source timestamp: Tue 2009-08-18 12:20:36 -0700 message: * write out bug after tweaking blocks ------------------------------------------------------------ revno: 738.3.165 committer: Don Armstrong <d...@donarmstrong.com> branch nick: source timestamp: Tue 2009-08-18 12:05:09 -0700 message: * add missing space after blocks
=== modified file 'Debbugs/Control.pm' --- Debbugs/Control.pm 2009-08-15 18:10:37 +0000 +++ Debbugs/Control.pm 2009-08-18 19:24:42 +0000 @@ -498,7 +498,7 @@ } $data->{blocks} = join(' ',sort keys %blocks); my $action = ($add_remove eq 'add'?'Added':'Removed'). - " indication that bug $data->{bug_num} blocks". + " indication that bug $data->{bug_num} blocks ". join(',',@blocks); append_action_to_log(bug => $data->{bug_num}, command => 'block', @@ -509,6 +509,7 @@ action => $action ) ); + writebug($data->{bug_num},$data); } __handle_affected_packages(%param,data=>\...@blocking_data); add_recipients(recipients => $param{recipients},