fix explanations in mcc that got broken by #8412 speedup

1 files changed, 2 insertions, 1 deletions

diff --git a/perl-install/standalone/logdrake b/perl-install/standalone/logdrake
index d2db74eee..1d421eeb9 100755
--- a/perl-install/standalone/logdrake
+++ b/perl-install/standalone/logdrake
@@ -210,7 +210,6 @@ my (@logs, %tags);
 
 sub parse_file {
   my ($file, $descr) = @_;
-  undef @logs;
   undef %tags;
 
   $file =~ s/\.gz$//;
@@ -369,6 +368,7 @@ sub logcolorize {
 	log_output("$rec[$therest] ", undef, $col);
     }
     log_output("\n",  undef, 'black');
+    log_output__real() if $isExplain;
 }
 
 
@@ -382,6 +382,7 @@ sub log_output {
 
 sub log_output__real() {
     text_append($log_text, \@logs);
+    undef @logs;
     $log_text->scroll_to_iter($log_buf->get_end_iter, 0, 1, 0.5, 0.5);
 }