From 3e259f9a398f035a161a8a0fa42c2b9c76fd73a3 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 18 Feb 2014 22:51:10 +0100 Subject: fix crash when choosing a RTL language (mga#12793) *** Gtk3::Widget::set_default_direction: passed too many parameters (expected 1, got 2); ignoring excess at /usr/lib/libDrakX/install/gtk.pm line 74. * error: FATAL: invalid enum GtkTextDirection value Gtk3::Widget, expecting: none / GTK_TEXT_DIR_NONE, ltr / GTK_TEXT_DIR_LTR, rtl / GTK_TEXT_DIR_RTL at /usr/lib/perl5/vendor_perl/5.18.2/i386-linux-thread-multi/Glib/Object/Introspection.pm line 59. --- perl-install/install/gtk.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/install/gtk.pm') diff --git a/perl-install/install/gtk.pm b/perl-install/install/gtk.pm index f9e6bf71c..41d43d42d 100644 --- a/perl-install/install/gtk.pm +++ b/perl-install/install/gtk.pm @@ -71,7 +71,7 @@ sub load_font { my ($o) = @_; if (defined($::WizardWindow) && lang::text_direction_rtl()) { - Gtk3::Widget->set_default_direction('rtl'); + Gtk3::Widget::set_default_direction('rtl'); my ($x, $y) = $::WizardWindow->get_position; my ($width) = $::WizardWindow->get_size; $::WizardWindow->move($::rootwidth - $width - $x, $y); -- cgit v1.2.1