diff options
| -rwxr-xr-x | perl-install/standalone/drakfloppy | 23 | ||||
| -rwxr-xr-x | perl-install/standalone/logdrake | 20 |
2 files changed, 0 insertions, 43 deletions
diff --git a/perl-install/standalone/drakfloppy b/perl-install/standalone/drakfloppy index 84ed955c0..a19e7889e 100755 --- a/perl-install/standalone/drakfloppy +++ b/perl-install/standalone/drakfloppy @@ -36,29 +36,6 @@ use ugtk qw(:helpers); init Gtk; Gtk->set_locale; -#------------------------------------------------------------- -# i18n routines -# IMPORTANT: next two routines have to be redefined here to -# get correct namespace (drakconf instead of libDrakX) -# (This version is now UTF8 compliant - Sg 2001-08-18) -#------------------------------------------------------------- - -#sub _ { -# my $s = shift @_; my $t = translate($s); -# sprintf $t, @_; -#} - -#sub translate { -# my ($s) = @_; -# $s ? c::dgettext('libDrakX', $s) : ''; -#} - -if ($::isEmbedded) { - print "EMBED\n"; - print "XID : $::XID\n"; - print "CCPID : $::CCPID\n"; -} - $in = 'interactive'->vnew('su', 'default'); local $_ = join '', @ARGV; diff --git a/perl-install/standalone/logdrake b/perl-install/standalone/logdrake index a8c37c240..740994a63 100755 --- a/perl-install/standalone/logdrake +++ b/perl-install/standalone/logdrake @@ -35,26 +35,6 @@ use my_gtk qw(:helpers :wrappers); use ugtk qw(:helpers); use Data::Dumper; -#------------------------------------------------------------- -# i18n routines -# IMPORTANT: next two routines have to be redefined here to -# get correct namespace (drakconf instead of libDrakX) -# (This version is now UTF8 compliant - Sg 2001-08-18) -#------------------------------------------------------------- - -#{ -# no warnings; -# sub _ { -# my $s = shift @_; my $t = translate($s); -# sprintf $t, @_; -# } - -# no warnings; -# sub translate { -# my ($s) = @_; -#$s ? c::dgettext('libDrakX', $s) : ''; -# } -#} $::isInstall and die "Not supported during install.\n"; |