2 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index 9a2fa08df..e7330ffc2 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,3 +1,4 @@
+- fix crash when choosing a RTL language (mga#12793)
 - Ensure uid/gid extraction works when adding users via summary page
   (fixes chown'ing user to root when adding existing user on upgrade mga#12375)
 
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);