holm/shorewall_code
1
0
Fork 0
forked from extern/shorewall_code
Code Pull Requests Activity

More openvpn changes

Browse Source 
git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@6243 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
This commit is contained in:
teastep 2007-05-05 00:02:21 +00:00
parent cad5d896d3
commit 2da69bd0b7
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Shorewall-perl/Shorewall/Rules.pm
View File

@ -950,7 +950,7 @@ sub process_rule1 ( $$$$$$$$$$ ) {
}
fatal_error "Missing source zone" if $sourcezone eq '-';
fatal_error "Unknown source zone ($sourcezone)" unless $zones{$sourcezone};
fatal_error "Unknown source zone ($sourcezone)" unless $zones{$sourcezone};
fatal_error "Missing destination zone" if $destzone eq '-';
fatal_error "Unknown destination zone ($destzone)" unless $zones{$destzone};

6
Shorewall-perl/Shorewall/Tunnels.pm
View File

@ -127,7 +127,7 @@ sub setup_tunnels() {
( $kind, my ( $proto, $p ) ) = split /:/, $kind;
if ( $p ) {
if ( defined $p && $p ne '' ) {
$port = $p;
$protocol = $proto;
} elsif ( $proto ) {
@ -150,7 +150,7 @@ sub setup_tunnels() {
( $kind, my ( $proto, $p ) ) = split /:/, $kind;
if ( $p ) {
if ( defined $p && $p ne '' ) {
$port = $p;
$protocol = $proto;
} elsif ( $proto ) {
@ -173,7 +173,7 @@ sub setup_tunnels() {
( $kind, my ( $proto, $p ) ) = split /:/, $kind;
if ( $p ) {
if ( defined $p && $p ne '' ) {
$port = $p;
$protocol = $proto;
} elsif ( $proto ) {