summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xdrakwizard.pl11
1 files changed, 1 insertions, 10 deletions
diff --git a/drakwizard.pl b/drakwizard.pl
index 45fffcac..4df0ab72 100755
--- a/drakwizard.pl
+++ b/drakwizard.pl
@@ -83,15 +83,6 @@ else {
$in->exit;
-
-#sub _ {
-# my ($format, @params) = @_;
-#
-# !$format and return;
-# sprintf(Locale::gettext::gettext($format), @params);}
-#}
-
-
sub member { my $e = shift; foreach (@_) { $e eq $_ and return 1 } 0 }
sub get_parameter {
@@ -107,7 +98,7 @@ sub get_parameter {
($Wizard_title, $lib_script, $perl_module, $rpm, $Wizard_pix_up) = @{$leaf}{qw(wizardTitle libScript perlModule rpm defaultImage)};
if ($rpm) {
if (!$in->do_pkgs->is_installed($rpm)) {
- $in->ask_okcancel("error", _("%s is not installed\nClick \"Next\" to install or \"Cancel\" to quit", $rpm)) and
+ $in->ask_okcancel("error", _("%s is not installed\nClick \"Next\" to install or \"Cancel\" to quit", c::from_utf8($rpm))) and
$in->do_pkgs->install($rpm) or
$in->exit;
}