- adapt to new ugtk2 utf8/l10n scheme

- fix #1922

1 files changed, 2 insertions, 8 deletions

diff --git a/print_launcher.pl b/print_launcher.pl
index fca534b0..1f21665e 100755
--- a/print_launcher.pl
+++ b/print_launcher.pl
@@ -3,18 +3,12 @@
 use strict;
 use lib qw(/usr/lib/libDrakX);
 use common;
+# i18n : IMPORTANT to get correct namespace (drakconf instead of libDrakX)
+BEGIN { unshift @::textdomains, 'drakconf' }
 use ugtk2 qw(:helpers :wrappers);;
 use interactive;
 use standalone;
 
-#-------------------------------------------------------------
-# i18n
-# IMPORTANT: next code is needed to get correct namespace : drakconf instead of libDrakX
-# (This version is now UTF8 compliant - Sg 2001-08-18)
-#-------------------------------------------------------------
-
-unshift @::textdomains, 'drakconf';
-
 my $sbindir = "/usr/sbin/";
 my $my_win = ugtk2->new('print_launcher');
 $my_win->{rwindow}->set_title(N("Printing configuration")) unless $::isEmbedded;