From 15f29ed90f1d313aae57b4d8220137779f11bad2 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Fri, 9 Jan 2004 20:50:55 +0000
Subject: (gtktext_insert) make it works with both Glib-0.95/Gtk2-0.95 and
 Glib-1.020/Gtk2-1.022

---
 perl-install/ugtk2.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

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

diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index c9089a78c..c008513bf 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -608,8 +608,7 @@ sub gtktext_insert {
             }
             $buffer->insert($iter1, $token->[0]);
             if ($token->[1]) {
-                my $tag = $buffer->create_tag(rand());
-                $tag->set(%{$token->[1]});
+                my $tag = $buffer->create_tag(rand(), %{$token->[1]});
                 $buffer->apply_tag($tag, $iter1 = $buffer->get_iter_at_offset($c), $buffer->get_end_iter);
             }
         }
-- 
cgit v1.2.1