From 9f27b552ea9eaf44eda8f6093d45227ff5338d50 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 11 Aug 2004 06:36:40 +0000 Subject: fix parsing with perl_checker --- common/Wizcommon.pm | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/common/Wizcommon.pm b/common/Wizcommon.pm index 3a6067c3..16b5427b 100644 --- a/common/Wizcommon.pm +++ b/common/Wizcommon.pm @@ -74,8 +74,7 @@ sub gtktext_get_log { $log_w->scroll_to_iter($end, 0, 0, 0, 0) if $want_scroll_down; } if (waitpid($pid, c::WNOHANG()) > 0) { - $buffer->insert_interactive($buffer->get_end_iter, "\n" . "#" x 20 . "\n" . " This script has terminated\ -, you can close this window", -1) if $buffer; + $buffer->insert_interactive($buffer->get_end_iter, "\n" . "#" x 20 . "\n" . " This script has terminated,\nyou can close this window", -1) if $buffer; $pid = $timeout = ''; 0; } else { @@ -105,7 +104,7 @@ sub run_command_and_log { 0, my $close_w = Gtk2::Button->new(N("Close"))), ); my $stop_running = gtktext_get_log($command, $log_w, $log_scroll); - $close_w->signal_connect(clicked => sub { $stop_running->() and $w->destroy and return 0}); + $close_w->signal_connect(clicked => sub { $stop_running->() and $w->destroy and return 0 }); $close_w->grab_focus; $w->show; } -- cgit v1.2.1