From f114fe23b1de6156dcd85393b2ebadab762e3e68 Mon Sep 17 00:00:00 2001 From: Arnaud Desmons Date: Thu, 29 Aug 2002 16:24:10 +0000 Subject: dhcp fix and script improvements and little fixes --- proxy_wizard/scripts/Squidconf.pm | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'proxy_wizard/scripts') diff --git a/proxy_wizard/scripts/Squidconf.pm b/proxy_wizard/scripts/Squidconf.pm index fa99558d..4437e355 100644 --- a/proxy_wizard/scripts/Squidconf.pm +++ b/proxy_wizard/scripts/Squidconf.pm @@ -5,6 +5,7 @@ require "__WIZ_HOME__/common/scripts/Vareqval.pm"; require "__WIZ_HOME__/common/scripts/Varspaceval.pm"; use MDK::Common; use strict; +use standalone; sub do_it_squid { my $file="/etc/squid/squid.conf"; @@ -17,6 +18,9 @@ sub do_it_squid { s|^\s*\#?\s*(cache_mem\s*)\d*(\s*MB.*)|$1$ENV{wiz_squid_mem}$2|; s|^\s*\#?\s*(http_port\s*)\d*(.*)|$1$ENV{wiz_squid_port}$2|; } $file; + standalone::explanations("$file: cache_dir = $ENV{wiz_squid_defdir} $ENV{wiz_squid_disk} +mynetw = $ENV{wiz_squid_mynetw} cache_mem = $ENV{wiz_squid_mem} http_port = $ENV{wiz_squid_port} +level = $ENV{wiz_squid_level}"); if ($ENV{wiz_squid_level} == 1) { substInFile { s|^\s*\#?\s*(http_access\s*)deny(\s*all.*)|\#$&$1allow$2|; -- cgit v1.2.1