diff options
Diffstat (limited to 'ftp_wizard')
-rwxr-xr-x | ftp_wizard/Proftpd.pm | 22 |
1 files changed, 15 insertions, 7 deletions
diff --git a/ftp_wizard/Proftpd.pm b/ftp_wizard/Proftpd.pm index adcc505f..aa4bc66c 100755 --- a/ftp_wizard/Proftpd.pm +++ b/ftp_wizard/Proftpd.pm @@ -26,7 +26,7 @@ use strict; use common; use services; -require MDK::Wizard::Wizcommon; +use MDK::Wizard::Wizcommon; my $wiz = MDK::Wizard::Wizcommon->new; @@ -145,12 +145,19 @@ needed to configure your FTP Server") . "\n\n" . N("To accept these values, and post => \&do_it, next => 'end' }, - end => { - name => N("Congratulations") . "\n\n" . N("The wizard successfully configured your Intranet/Internet FTP Server"), - end => 1, - no_back => 1, - next => 0 - }, + end => { + name => N("Congratulations") . "\n\n" . N("The wizard successfully configured your Intranet/Internet FTP Server"), + end => 1, + no_back => 1, + next => 0 + }, + error_end => { + name => N("Failed"), + data => [ { label => N("Relaunch drakwizard, and try to change some parameters.") } ], + no_back => 1, + end => 1, + next => 0, + }, }; sub new { @@ -318,6 +325,7 @@ sub do_it { } else { services::start('proftpd') } + check_started('proftpd'); } 1; |