From 515e1e51f8c9e67bf201781a6bfd2bf61ca69667 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 4 Mar 2003 15:26:28 +0000 Subject: scroll back when logging --- perl-install/standalone/logdrake | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/standalone/logdrake b/perl-install/standalone/logdrake index 238d21275..536a1613c 100755 --- a/perl-install/standalone/logdrake +++ b/perl-install/standalone/logdrake @@ -364,7 +364,8 @@ sub logcolorize { # log_output (Gtk2::TextView, [ [ ... ] ]) sub log_output { gtktext_append($log_text, [ \@_ ]); -# $log_buf->insert($buf->get_end_iter(), @_, -1); + $log_text->scroll_to_iter(my $iter = $log_buf->get_end_iter, 0, 1, 0.5, 0.5); + $iter->free; } -- cgit v1.2.1