From c7f0d804205670f60e93bcb684470bae3f0d7525 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Mon, 16 May 2005 03:20:14 +0000
Subject: (_text_insert) append option was ignored when using simplified API

---
 perl-install/mygtk2.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'perl-install/mygtk2.pm')

diff --git a/perl-install/mygtk2.pm b/perl-install/mygtk2.pm
index 0ee3b7bc2..65221d0b2 100644
--- a/perl-install/mygtk2.pm
+++ b/perl-install/mygtk2.pm
@@ -825,7 +825,11 @@ sub _text_insert {
             }
         }
     } else {
-        $buffer->set_text($t);
+        if ($opts{append}) {
+            $buffer->insert($buffer->get_end_iter, $t);
+        } else {
+            $buffer->set_text($t);
+        }
     }
     #- the following line is needed to move the cursor to the beginning, so that if the
     #- textview has a scrollbar, it will not scroll to the bottom when focusing (#3633)
-- 
cgit v1.2.1