#!/usr/bin/perl

do '../web-lib.pl';
$|=1;
&init_config();
%access = &get_module_acl();
&ReadParse();

$out = `/usr/local/apache/bin/apachectl configtest 2>&1`;

if ($out && $out !~ /syntax\s+ok/i) {
	&error("Problème de configuration dans apache:<p><tt>$out</tt>");
}

$out = `/usr/local/apache/bin/apachectl restart 2>&1`;
if ($out !~ /httpd restarted/) {
	&error("Apache n'a pas pu redemarrer correctement:<p><tt>$out</tt>");
}

$out = `/etc/rc.d/init.d/named restart`;

&redirect("");

