From 1fe029f48a253a46cded5fabf3891c19b379cf9f Mon Sep 17 00:00:00 2001 From: Antoine Ginies Date: Wed, 28 Jan 2004 11:12:36 +0000 Subject: - val to fixed_val in summary - fix typo --- proxy_wizard/Squid.pm | 22 +++++++++++----------- 1 file changed, 11 insertions(+), 11 deletions(-) (limited to 'proxy_wizard/Squid.pm') diff --git a/proxy_wizard/Squid.pm b/proxy_wizard/Squid.pm index 009ff192..6eb2c433 100755 --- a/proxy_wizard/Squid.pm +++ b/proxy_wizard/Squid.pm @@ -147,12 +147,12 @@ $o->{pages} = { summary => { name => N("Configuring the Proxy") . "\n\n" . N("The wizard collected the following parameters needed to configure your proxy:") . "\n\n" . N("To accept these values, and configure your server, click the Next button or use the Back button to correct them."), data => [ - { label => N("Port:"), type => 'field', val => \$o->{var}{wiz_squid_port} }, - { label => N("Memory cache (MB):"), type => 'field', val => \$o->{var}{wiz_squid_mem} }, - { label => N("Disk space (MB):"), type => 'field', val => \$o->{var}{wiz_squid_disk} }, - { label => N("Access Control:"), type => 'field', val => \$o->{var}{wiz_squid_mynetw} }, - { label => N("Upper level proxy hostname:"), type => 'field', val => \$o->{var}{wiz_squid_cachepeer} }, - { label => N("Upper level proxy port:"), type => 'field', val => \$o->{var}{wiz_squid_peerport} }, + { label => N("Port:"), type => 'field', fixed_val => \$o->{var}{wiz_squid_port} }, + { label => N("Memory cache (MB):"), type => 'field', fixed_val => \$o->{var}{wiz_squid_mem} }, + { label => N("Disk space (MB):"), type => 'field', fixed_val => \$o->{var}{wiz_squid_disk} }, + { label => N("Access Control:"), type => 'field', fixed_val => \$o->{var}{wiz_squid_mynetw} }, + { label => N("Upper level proxy hostname:"), type => 'field', fixed_val => \$o->{var}{wiz_squid_cachepeer} }, + { label => N("Upper level proxy port:"), type => 'field', fixed_val => \$o->{var}{wiz_squid_peerport} }, ], post => \&do_it, next => 'end' @@ -160,10 +160,10 @@ $o->{pages} = { summary_2 => { name => N("Configuring the Proxy") . "\n\n" . N("The wizard collected the following parameters needed to configure your proxy:") . "\n\n" . N("To accept these values, and configure your server, click the Next button or use the Back button to correct them."), data => [ - { label => N("Port:"), type => 'field', val => \$o->{var}{wiz_squid_port} }, - { label => N("Memory cache (MB):"), type => 'field', val => \$o->{var}{wiz_squid_mem} }, - { label => N("Disk space (MB):"), type => 'field', val => \$o->{var}{wiz_squid_disk} }, - { label => N("Access Control:"), type => 'field', val => \$o->{var}{wiz_squid_mynetw} }, + { label => N("Port:"), type => 'field', fixed_val => \$o->{var}{wiz_squid_port} }, + { label => N("Memory cache (MB):"), type => 'field', fixed_val => \$o->{var}{wiz_squid_mem} }, + { label => N("Disk space (MB):"), type => 'field', fixed_val => \$o->{var}{wiz_squid_disk} }, + { label => N("Access Control:"), type => 'field', fixed_val => \$o->{var}{wiz_squid_mynetw} }, ], post => \&do_it, next => 'end' @@ -259,7 +259,7 @@ level = $o->{var}{wiz_squid_level}"); } $file; } elsif ($o->{var}{wiz_squid_menupeer} == 2 && length $o->{var}{wiz_squid_cachepeer}) { - if (lenght($t)) { + if (length($t)) { substInFile { s|^\s*#?\s*(cache_peer.*)|#$&|; } $file; -- cgit v1.2.1