diff options
author | Antoine Ginies <aginies@mandriva.com> | 2006-06-20 15:52:38 +0000 |
---|---|---|
committer | Antoine Ginies <aginies@mandriva.com> | 2006-06-20 15:52:38 +0000 |
commit | 48fd0caf51d04e7956618f632173a6c81f31e870 (patch) | |
tree | 3927c08d6ecd9d0b5307040aac7a672c7379f354 /ftp_wizard | |
parent | 3d6553c585664cd5a37a8ebbd7fbe265b98be868 (diff) | |
download | drakwizard-48fd0caf51d04e7956618f632173a6c81f31e870.tar drakwizard-48fd0caf51d04e7956618f632173a6c81f31e870.tar.gz drakwizard-48fd0caf51d04e7956618f632173a6c81f31e870.tar.bz2 drakwizard-48fd0caf51d04e7956618f632173a6c81f31e870.tar.xz drakwizard-48fd0caf51d04e7956618f632173a6c81f31e870.zip |
fix ask_warn problem
Diffstat (limited to 'ftp_wizard')
-rwxr-xr-x | ftp_wizard/Proftpd.pm | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/ftp_wizard/Proftpd.pm b/ftp_wizard/Proftpd.pm index 9ac8aaed..2f5cba0d 100755 --- a/ftp_wizard/Proftpd.pm +++ b/ftp_wizard/Proftpd.pm @@ -29,6 +29,7 @@ use services; use MDK::Wizard::Wizcommon; my $wiz = MDK::Wizard::Wizcommon->new; +my $in = interactive->vnew; my $file = "/etc/proftpd.conf"; @@ -88,7 +89,7 @@ $o->{pages} = { ], complete => sub { if ($o->{var}{wiz_ftp_external} == 0 && $o->{var}{wiz_ftp_internal} == 0) { - $::in->ask_warn(N("Error"), N("Please choose whether to allow a connection to FTP server from internal or external hosts.")); + $in->ask_warn(N("Error"), N("Please choose whether to allow a connection to FTP server from internal or external hosts.")); return 1; } else { return 0 } }, @@ -107,10 +108,10 @@ $o->{pages} = { ], complete => sub { if (!any { /bash/ } cat_("/etc/shells")) { - $::in->ask_warn(N("Error"), N("I can't find bash in list of shells! It seems you have modified it by hand! Please correct.")); + $in->ask_warn(N("Error"), N("I can't find bash in list of shells! It seems you have modified it by hand! Please correct.")); return 1; } - if (!$o->{var}{wiz_server_name}) { $::in->ask_warn(N("Error"), N("Need a server name")); return 1; } + if (!$o->{var}{wiz_server_name}) { $in->ask_warn(N("Error"), N("Need a server name")); return 1; } }, next => 'options_step2', }, @@ -128,7 +129,7 @@ $o->{pages} = { { label => N("Allow FTP resume:"), type => 'bool', val => \$o->{var}{wiz_ftp_resume} }, { label => N("Allow FXP:"), type => 'bool', val => \$o->{var}{wiz_ftp_fxp} }, ], - complete => sub { if ($o->{var}{wiz_port} !~ /^\d+$/) { $::in->ask_warn(N('Error'), N('FTP Port should be a number.')); return 1; } }, + complete => sub { if ($o->{var}{wiz_port} !~ /^\d+$/) { $in->ask_warn(N('Error'), N('FTP Port should be a number.')); return 1; } }, next => 'summary', }, warning_dhcp => { |