summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/drakvpn
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-02-16 17:23:08 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-02-16 17:23:08 +0000
commit0f42e87bf4fb7a28ec7ecb817aa7009fde0f2b59 (patch)
tree51812e932757cf8cc3391e1050a944015dc22455 /perl-install/standalone/drakvpn
parenta916c275c33f0c4bfd5a374bcc9cee849a56c4fd (diff)
downloaddrakx-0f42e87bf4fb7a28ec7ecb817aa7009fde0f2b59.tar
drakx-0f42e87bf4fb7a28ec7ecb817aa7009fde0f2b59.tar.gz
drakx-0f42e87bf4fb7a28ec7ecb817aa7009fde0f2b59.tar.bz2
drakx-0f42e87bf4fb7a28ec7ecb817aa7009fde0f2b59.tar.xz
drakx-0f42e87bf4fb7a28ec7ecb817aa7009fde0f2b59.zip
do not list twice the same elements in list...
Diffstat (limited to 'perl-install/standalone/drakvpn')
-rw-r--r--perl-install/standalone/drakvpn12
1 files changed, 6 insertions, 6 deletions
diff --git a/perl-install/standalone/drakvpn b/perl-install/standalone/drakvpn
index 49fa7b563..1dc2465dc 100644
--- a/perl-install/standalone/drakvpn
+++ b/perl-install/standalone/drakvpn
@@ -537,11 +537,11 @@ step_add_section_ipsec_conf_k26:
N("Your %s file has several sections, or connections.\n
You can now add a new section.
Choose continue when you are done to write the data.\n", $ipsec_conf),
- [ { label => N("Secure policy"), val => \$section->{secure_policy}, list => [ 'spdadd', 'spdadd' ] },
+ [ { label => N("Secure policy"), val => \$section->{secure_policy}, list => [ 'spdadd' ], allow_empty_list => 1 },
{ label => N("Source IP range"), val => \$section->{src_range}, type => 'entry' },
{ label => N("Destination IP range"), val => \$section->{dst_range}, type => 'entry' },
- { label => N("Upper-layer protocol"), val => \$section->{upperspec}, list => [ 'any', 'any' ] },
- { label => N("Flag"), val => \$section->{flag}, list => [ '-P', '-P' ] },
+ { label => N("Upper-layer protocol"), val => \$section->{upperspec}, list => [ 'any' ], allow_empty_list => 1 },
+ { label => N("Flag"), val => \$section->{flag}, list => [ '-P' ], allow_empty_list => 1 },
{ label => N("Direction"), val => \$section->{direction}, list => [ 'in', 'out' ] },
{ label => N("IPsec policy"), val => \$section->{ipsec}, list => [ 'ipsec', 'discard', 'none' ] },
{ label => N("Protocol"), val => \$section->{protocol}, list => [ 'esp', 'ah', 'ipcomp' ] },
@@ -646,11 +646,11 @@ Choose continue when you are done to write the data.\n", $ipsec_conf),
N("Your %s file has several sections, or connections.\n
You can now edit the chosen section.
Choose continue when you are done to write the data.\n", $ipsec_conf),
- [ { label => N("Secure policy"), val => \$ipsec->{$number}{secure_policy}, list => [ 'spdadd', 'spdadd' ] },
+ [ { label => N("Secure policy"), val => \$ipsec->{$number}{secure_policy}, list => [ 'spdadd' ], allow_empty_list => 1 },
{ label => N("Source IP range"), val => \$ipsec->{$number}{src_range}, type => 'entry' },
{ label => N("Destination IP range"), val => \$ipsec->{$number}{dst_range}, type => 'entry' },
- { label => N("Upper-layer protocol"), val => \$ipsec->{$number}{upperspec}, list => [ 'any', 'any' ] },
- { label => N("Flag"), val => \$ipsec->{$number}{flag}, list => [ '-P', '-P' ] },
+ { label => N("Upper-layer protocol"), val => \$ipsec->{$number}{upperspec}, list => [ 'any' ], allow_empty_list => 1 },
+ { label => N("Flag"), val => \$ipsec->{$number}{flag}, list => [ '-P' ], allow_empty_list => 1 },
{ label => N("Direction"), val => \$ipsec->{$number}{direction}, list => [ 'in', 'out' ] },
{ label => N("IPsec policy"), val => \$ipsec->{$number}{ipsec}, list => [ 'ipsec', 'discard', 'none' ] },
{ label => N("Protocol"), val => \$ipsec->{$number}{protocol}, list => [ 'esp', 'ah', 'ipcomp' ] },