now use check_started

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;