From e6792ed6adcb6858b1c79b93a9ad092e4862131c Mon Sep 17 00:00:00 2001 From: Antoine Ginies Date: Fri, 6 Feb 2004 15:09:06 +0000 Subject: now use check_started --- proxy_wizard/Squid.pm | 13 +++++++++++-- 1 file changed, 11 insertions(+), 2 deletions(-) (limited to 'proxy_wizard') diff --git a/proxy_wizard/Squid.pm b/proxy_wizard/Squid.pm index ae8254cb..e2687b33 100755 --- a/proxy_wizard/Squid.pm +++ b/proxy_wizard/Squid.pm @@ -26,7 +26,7 @@ use strict; use common; use services; -require MDK::Wizard::Wizcommon; +use MDK::Wizard::Wizcommon; my $wiz = new MDK::Wizard::Wizcommon; my $df = -d '/var/spool/squid' ? `/bin/df -m /var/spool/squid` : `/bin/df -m /var/spool`; @@ -172,7 +172,15 @@ $o->{pages} = { name => N("Congratulations") . N("The wizard have successfully configured your proxy server."), end => 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 { @@ -273,5 +281,6 @@ level = $o->{var}{wiz_squid_level}"); services::start('squid') } undef $w; + check_started('squid'); } 1; -- cgit v1.2.1