summaryrefslogtreecommitdiffstats
path: root/perl-install/network/shorewall.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-01-16 12:52:16 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-01-16 12:52:16 +0000
commited34673d3b633aebed12f76a77a18927605ae4dc (patch)
tree33b3bb3aab1132e459a3844e64c9c1425ef7e735 /perl-install/network/shorewall.pm
parent3a0c20dcb15fd2ffb1364f762c650f71bd826ed0 (diff)
downloaddrakx-ed34673d3b633aebed12f76a77a18927605ae4dc.tar
drakx-ed34673d3b633aebed12f76a77a18927605ae4dc.tar.gz
drakx-ed34673d3b633aebed12f76a77a18927605ae4dc.tar.bz2
drakx-ed34673d3b633aebed12f76a77a18927605ae4dc.tar.xz
drakx-ed34673d3b633aebed12f76a77a18927605ae4dc.zip
- add icmp support
- add "Echo request (ping)" choice
Diffstat (limited to 'perl-install/network/shorewall.pm')
-rw-r--r--perl-install/network/shorewall.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/network/shorewall.pm b/perl-install/network/shorewall.pm
index bd069f063..5dcdb70d2 100644
--- a/perl-install/network/shorewall.pm
+++ b/perl-install/network/shorewall.pm
@@ -114,7 +114,7 @@ sub write {
my %ports_by_proto;
foreach (split ' ', $conf->{ports}) {
- m!^(\d+)/(udp|tcp)$! or die "bad port $_\n";
+ m!^(\d+)/(udp|tcp|icmp)$! or die "bad port $_\n";
push @{$ports_by_proto{$2}}, $1;
}