From c3cbb7628d2e6424a7ca51c15ee2088bf824daa1 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Sun, 28 Sep 2008 20:45:19 +0000
Subject: fix crash: 'Can't locate object method "get_text" via package
 "Gtk2::CellView"'

(regression introduced in r244919 on 2008-09-08:
"make some pull down menus not editable")
---
 perl-install/NEWS                  | 2 ++
 perl-install/standalone/draksplash | 8 ++++----
 2 files changed, 6 insertions(+), 4 deletions(-)

(limited to 'perl-install')

diff --git a/perl-install/NEWS b/perl-install/NEWS
index fe1234f4a..d5a88625c 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,4 +1,6 @@
 - draksplash:
+  o fix crashing when altering read-only combo boxes
+    (regression introduced in 11.37 on 2008-09-08)
   o make it fit a little better in 800x600 resolution (#36105)
 
 Version 11.56 - 26 September 2008
diff --git a/perl-install/standalone/draksplash b/perl-install/standalone/draksplash
index 384dc416a..24c543401 100755
--- a/perl-install/standalone/draksplash
+++ b/perl-install/standalone/draksplash
@@ -68,7 +68,7 @@ $notebook->append_page(gtknew('VBox', spacing => 5, children_tight => [
                                      gtknew('Label', text => N("Gradient type")),
                                      gtksignal_connect(
                                          Gtk2::ComboBox->new_with_strings([ 'vertical', 'horizontal' ], 'vertical'),
-                                         changed => sub { $theme{conf}{gradient} = $_[0]->get_child->get_text }),
+                                         changed => sub { $theme{conf}{gradient} = $_[0]->entry->get_text }),
                                  ]),
 				 gtknew('Button', text => N("Choose text color"),
                                         clicked => sub { choose_color('text_color') }),
@@ -82,10 +82,10 @@ $notebook->append_page(gtknew('VBox', spacing => 5, children_tight => [
                                         clicked => sub { choose_color('tc') }),
 				 gtknew('Label', text => N("Text color")), 
                                  gtksignal_connect(Gtk2::ComboBox->new_with_strings([ 0 .. 15 ], 1),
-                                                   changed => sub { $theme{conf}{fgcolor} = $_[0]->get_child->get_text }),
+                                                   changed => sub { $theme{conf}{fgcolor} = $_[0]->entry->get_text }),
 				 gtknew('Label', text => N("Background color")),
                                  gtksignal_connect(Gtk2::ComboBox->new_with_strings([ 0 .. 15 ], '0'), 
-                                                   changed => sub { $theme{conf}{bgcolor} = $_[0]->get_child->get_text }),
+                                                   changed => sub { $theme{conf}{bgcolor} = $_[0]->entry->get_text }),
 				 gtknew('Button', text => N("Choose picture"), clicked => sub { choose_image('jpeg') })]),
 		       N("Verbose bootsplash"));
 
@@ -98,7 +98,7 @@ gtkadd($window->{window},
 					   gtksignal_connect(
                                                Gtk2::ComboBoxEntry->new_with_strings(
                                                    [ bootsplash::themes_list() ], $theme{name}),
-                                               changed => sub { set_theme($_[0]->get_child->get_text) }) ],
+                                               changed => sub { set_theme($_[0]->entry->get_text) }) ],
 					 [ gtknew('Label', text => N("Final resolution")),
 					   gtksignal_connect(gtknew('ComboBox', text => $theme{res},
                                                                     list => \@bootsplash::resolutions),
-- 
cgit v1.2.1