diff options
Diffstat (limited to 'news_wizard/Inn.pm')
| -rwxr-xr-x | news_wizard/Inn.pm | 19 |
1 files changed, 9 insertions, 10 deletions
diff --git a/news_wizard/Inn.pm b/news_wizard/Inn.pm index c2689786..a9bf56bf 100755 --- a/news_wizard/Inn.pm +++ b/news_wizard/Inn.pm @@ -41,28 +41,28 @@ my $o = { $o->{pages} = { welcome => { - name => N("Welcome to the News Wizard") . "\n\n" . N("This wizard will help you configuring the Internet News services for your network."), + name => N("Welcome to the News Wizard") . "\n\n" . N("This wizard will help you configuring the internet News services for your network."), no_back => 1, next => 'ask_news_server' }, ask_news_server => { - name => N("News Server") . "\n\n" . N("The news server name is the name of the host providing the Internet news to your network; the name is usually provided by your provider.") . "\n\n" . N("Internet host names must be in the form \"host.domain.domaintype\"; for example, if your provider is \"provider.com\", the internet news server is usually \"news.provider.com\"."), + name => N("News server") . "\n\n" . N("The news server name is the name of the host providing the internet news to your network; the name is usually provided by your provider.") . "\n\n" . N("Internet host names must be in the form \"host.domain.domaintype\"; for example, if your provider is \"provider.com\", the internet news server is usually \"news.provider.com\"."), pre => sub { $o->{var}{news_server} ||= get_server(); }, data => [ - { label => N("News Server Name:"), val => \$o->{var}{news_server} }, + { label => N("News server name:"), val => \$o->{var}{news_server} }, ], post => sub { $o->{var}{news_server} || 'error_in_news_server' }, next => 'ask_news_freq' }, ask_news_freq => { - name => N("Polling Period") . "\n\n" . N("Your server will regularly poll the News Server for obtaning the latest Internet News; the polling period set the interval between two consecutive polling.") . "\n\n" . N("Depending on the kind of internet connection you have, an appropriate polling period can change between 6 and 24 hours."), + name => N("Polling period") . "\n\n" . N("Your server will regularly poll the News server for obtaning the latest internet News; the polling period set the interval between two consecutive polling.") . "\n\n" . N("Depending on the kind of internet connection you have, an appropriate polling period can change between 6 and 24 hours."), pre => sub { $o->{var}{news_freq} ||= 24; }, data => [ - { label => N("Polling Period (Hours):"), val => \$o->{var}{news_freq} }, + { label => N("Polling period (hours):"), val => \$o->{var}{news_freq} }, ], post => \&check_valid_hours, next => 'summary' @@ -83,17 +83,16 @@ $o->{pages} = { next => 'ask_news_freq' }, summary => { - name => N("Configuring the Internet News") . "\n\n" . N("The wizard collected the following parameters -needed to configure your Internet News Service:") . "\n\n" . N("To accept these values, and configure your server, click the Next button or use the Back button to correct them."), + name => N("Configuring the internet News") . "\n\n" . N("The wizard collected the following parameters needed to configure your internet News service:") . "\n\n" . N("To accept these values, and configure your server, click the next button or use the back button to correct them."), data => [ - { label => N("News Server:"), fixed_val => \$o->{var}{news_server} }, - { label => N("Polling Interval:"), fixed_val => \$o->{var}{news_freq} }, + { label => N("News server:"), fixed_val => \$o->{var}{news_server} }, + { label => N("Polling interval:"), fixed_val => \$o->{var}{news_freq} }, ], post => \&do_it, next => 'end' }, end => { - name => N("Congratulations") . "\n\n" . N("The wizard successfully configured your Internet News service of your server."), + name => N("Congratulations") . "\n\n" . N("The wizard successfully configured your internet News service of your server."), end => 1, next => 0 }, |