summaryrefslogtreecommitdiffstats
path: root/proxy_wizard/Squid.pm
diff options
context:
space:
mode:
Diffstat (limited to 'proxy_wizard/Squid.pm')
-rwxr-xr-xproxy_wizard/Squid.pm22
1 files changed, 11 insertions, 11 deletions
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;