From 07a103131590cd80efc6fa736717f369d07288cb Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 2 Aug 2004 04:25:23 +0000 Subject: (log_output__real) rename it as insert_text_n_scroll() in order to better reflect what it does --- perl-install/standalone/logdrake | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/perl-install/standalone/logdrake b/perl-install/standalone/logdrake index 21be51b6d..de563c262 100755 --- a/perl-install/standalone/logdrake +++ b/perl-install/standalone/logdrake @@ -283,7 +283,7 @@ sub parse_file { seek F, 0, 1; }); } - log_output__real(); + insert_text_n_scroll(); } @@ -336,7 +336,7 @@ sub logcolorize { log_output("$rec[$therest] ", undef, $col); } log_output("\n", undef, 'black'); - log_output__real() if $isExplain; + insert_text_n_scroll() if $isExplain; } @@ -348,7 +348,7 @@ sub log_output { $log_buf->{tags}{$tag} ||= { if_($font, font => $font), foreground => $col }; } -sub log_output__real() { +sub insert_text_n_scroll() { ugtk2::gtktext_insert($log_text, \@logs, { append => !($isExplain || $isTail) }); $log_text->scroll_to_iter($log_buf->get_end_iter, 0, 1, 0.5, 0.5); undef @logs; -- cgit v1.2.1