diff options
| author | Norbert Preining <preining@logic.at> | 2014-01-26 22:53:10 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2014-01-26 22:53:10 +0000 |
| commit | 52a6d76389458ab193943b5cd9ee9e1e5c38dfc0 (patch) | |
| tree | 1b2f89e4171f42691a26811c371879a64292f5f4 | |
| parent | f55661d9175af3ebd2fb16598834291cd96dfed3 (diff) | |
more fixes to the wizard
git-svn-id: svn://tug.org/texlive/trunk@32798 c570f23f-e606-0410-a88d-b1316a301751
| -rw-r--r-- | Master/tlpkg/installer/install-menu-wizard.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Master/tlpkg/installer/install-menu-wizard.pl b/Master/tlpkg/installer/install-menu-wizard.pl index c5a527c9f33..e1408df8266 100644 --- a/Master/tlpkg/installer/install-menu-wizard.pl +++ b/Master/tlpkg/installer/install-menu-wizard.pl @@ -642,9 +642,9 @@ sub ask_go { for my $o (@opts_list) { my $text = $opts_to_str{$o} . ":\t"; if (exists ($opts_choices{$o})) { - $text .= $opts_choices{$o}->[$vars{"option_$o"}]; + $text .= $opts_choices{$o}->[$vars{$o}]; } else { - $text .= $vars{"option_$o"} ? __("Yes") : __("No"); + $text .= $vars{$o} ? __("Yes") : __("No"); } $fmain->Label(-justify => "left", -text => $text)->place(-x => 0, -y => $ytmp); |