From 039a875b70d102f42f801d2ad396a712b8a7685e Mon Sep 17 00:00:00 2001
From: teastep <teastep@fbd18981-670d-0410-9b5c-8dc0c1a9a2bb>
Date: Mon, 21 Apr 2008 20:17:04 +0000
Subject: [PATCH] Avoid undefined value error

git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@8472 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
---
 Shorewall-perl/Shorewall/Chains.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Shorewall-perl/Shorewall/Chains.pm b/Shorewall-perl/Shorewall/Chains.pm
index 649a193bc..03b70fb04 100644
--- a/Shorewall-perl/Shorewall/Chains.pm
+++ b/Shorewall-perl/Shorewall/Chains.pm
@@ -1419,7 +1419,7 @@ sub get_set_flags( $$ ) {
 sub match_source_net( $;$ ) {
     my ( $net, $restriction) = @_;
 
-    $restriction |= NO_RESTRICT;
+    $restriction ||= NO_RESTRICT;
 
     if ( $net =~ /^(!?)(\d+\.\d+\.\d+\.\d+)-(\d+\.\d+\.\d+\.\d+)$/ ) {
 	my ($addr1, $addr2) = ( $2, $3 );