From 0f42e87bf4fb7a28ec7ecb817aa7009fde0f2b59 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 16 Feb 2004 17:23:08 +0000 Subject: do not list twice the same elements in list... --- perl-install/standalone/drakvpn | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 'perl-install/standalone') 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' ] }, -- cgit v1.2.1