From 5547e51ebb789dabb23091aea0115b0a3ea7b878 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Mon, 6 Jan 2003 15:14:18 +0000
Subject: prevent one to write in log buffer

---
 perl-install/standalone/logdrake | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'perl-install/standalone/logdrake')

diff --git a/perl-install/standalone/logdrake b/perl-install/standalone/logdrake
index 66e9b6fd3..891dcf5f8 100755
--- a/perl-install/standalone/logdrake
+++ b/perl-install/standalone/logdrake
@@ -150,6 +150,7 @@ my %files = (
 
 my $yy = gtkset_sensitive(gtksignal_connect(new Gtk2::Button(N("search")) , clicked => \&search),0);
 my $log_text = new Gtk2::TextView;
+$log_text->set_property('editable', 0);
 my $log_buf = $log_text->get_buffer();
 my $refcount_search;
 #### far from window
@@ -361,6 +362,7 @@ sub logcolorize {
 #    log_output (Gtk2::TextView, [ [ ... ] ])
 sub log_output {
     gtktext_append($log_text, [ \@_ ]);
+#    $log_buf->insert($buf->get_end_iter(), @_, -1);
 }
 
 
-- 
cgit v1.2.1