* write out bug after tweaking blocks

diff --git a/Debbugs/Control.pm b/Debbugs/Control.pm
index 3ba26dff75c62b22c2bbdcd4f1de740acace6b30..5fdba0650304707f64db1103e13ffb01bd03978d 100644 (file)
--- a/Debbugs/Control.pm
+++ b/Debbugs/Control.pm
@@ -509,6 +509,7 @@ sub set_blocks {
                                                                   action => $action
                                                                   )
                                    );
+               writebug($data->{bug_num},$data);
            }
            __handle_affected_packages(%param,data=>\@blocking_data);
            add_recipients(recipients => $param{recipients},