From 9b80b439e34c01759443ba05c61dc6ea4c3cf640 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Thu, 26 Feb 2004 16:02:26 +0000
Subject: (Gtk2::Banner::new) add o_otions ref hash parameter, thus enabling to
 override text position (eg: for mcc about dialog)

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

diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index 890ed5b01..5fa9aba62 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -1622,7 +1622,7 @@ sub set_pixmap {
 
 
 sub new {
-    my ($_class, $icon, $text) = @_;
+    my ($_class, $icon, $text, $o_options) = @_;
 
     my $darea = Gtk2::DrawingArea->new;
     $darea->set_size_request(-1, 75);
@@ -1637,7 +1637,8 @@ sub new {
                                my $height = $darea->{icon}->get_height;
                                $darea->{icon}->render_to_drawable($darea->window, $style->bg_gc('normal'),
                                                                   0, 0, 10, 10, -1, -1, 'none', 0, 0);
-                               $darea->window->draw_layout($style->text_gc('normal'), $height + 20, 25, $darea->{layout});
+                               $darea->window->draw_layout($style->text_gc('normal'), $height + 20, $o_options->{txt_ypos} || 25,
+                                                           $darea->{layout});
                                1;
                            });
                                
-- 
cgit v1.2.1