2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install/gtk.pm b/perl-install/install/gtk.pm
index a60d6d678..ee0899b2e 100644
--- a/perl-install/install/gtk.pm
+++ b/perl-install/install/gtk.pm
@@ -202,7 +202,7 @@ q(<fontconfig>
     }
 
     Gtk3->init;
-    Gtk3->set_locale;
+    c::init_setlocale();
 }
 
 #------------------------------------------------------------------------------
diff --git a/perl-install/install/steps_gtk.pm b/perl-install/install/steps_gtk.pm
index 928c29336..c55324f84 100644
--- a/perl-install/install/steps_gtk.pm
+++ b/perl-install/install/steps_gtk.pm
@@ -180,7 +180,7 @@ sub leavingStep {
 
 sub charsetChanged {
     my ($o) = @_;
-    Gtk3->set_locale;
+    c::init_setlocale();
     install::gtk::load_font($o);
     install::gtk::create_steps_window($o);
 }