diff options
Diffstat (limited to 'perl-install/any.pm')
| -rw-r--r-- | perl-install/any.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm index 6939e1638..3239e38f0 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -1837,7 +1837,11 @@ sub configure_timezone { my ($in, $timezone, $ask_gmt, $o_hide_ntp) = @_; require timezone; - my $selected_timezone = $in->ask_from_treelist(N("Timezone"), N("Which is your timezone?"), '/', [ timezone::getTimeZones() ], $timezone->{timezone}) or return; + my $selected_timezone = $timezone->{timezone}; + $in->ask_from_( + { interactive_help_id => 'configureTimezone', title => N("Timezone"), messages => N("Which is your timezone?") }, + [ { val => \$selected_timezone, separator => '/', list => [ timezone::getTimeZones() ], sort => 1 } ] + ); $timezone->{timezone} = $selected_timezone; configure_time_more($in, $timezone, $o_hide_ntp) |