diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-08-04 02:16:34 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-08-04 02:16:34 +0000 |
| commit | d3218e0694c12a50fabeb595ef6eb853b0029656 (patch) | |
| tree | fb5066a5872ac9cb3fd2a935c35532f27f923cdf /perl-install | |
| parent | d7b38982731b297fe1ad43fc9034290e33426c20 (diff) | |
| download | drakx-d3218e0694c12a50fabeb595ef6eb853b0029656.tar drakx-d3218e0694c12a50fabeb595ef6eb853b0029656.tar.gz drakx-d3218e0694c12a50fabeb595ef6eb853b0029656.tar.bz2 drakx-d3218e0694c12a50fabeb595ef6eb853b0029656.tar.xz drakx-d3218e0694c12a50fabeb595ef6eb853b0029656.zip | |
- upcase fields values (and btw reduce the number of strings to translate :-))
- simplify translating
Diffstat (limited to 'perl-install')
| -rwxr-xr-x | perl-install/standalone/draksec | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/perl-install/standalone/draksec b/perl-install/standalone/draksec index f93ac2840..4ca353089 100755 --- a/perl-install/standalone/draksec +++ b/perl-install/standalone/draksec @@ -41,8 +41,16 @@ use security::l10n; my ($w, %fields); ############################ I18N ################################### -my %inv_translations = map { translate($_) => $_ } N_("ALL"), N_("LOCAL"), N_("NONE"), N_("default"), N_("default"), N_("ignore"), N_("no"), N_("yes"); -my %translations = reverse %inv_translations; +my %translations = ( + 'ALL' => N("ALL"), + 'LOCAL' => N("LOCAL"), + 'NONE' => N("NONE"), + 'default' => N("Default"), + 'ignore' => N("Ignore"), + 'no' => N("No"), + 'yes' => N("Yes"), +); +my %inv_translations = reverse %translations; sub to_i18n { map { $translations{$_} || $_ } @_ } sub from_i18n { $inv_translations{$_[0]} || $_[0] } |