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

Fix configure.pl

Browse Source 
Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2012-04-12 06:53:58 -07:00
parent 439fe77d1c
commit 355f8e195c
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
Shorewall-core/configure.pl
View File

@ -66,10 +66,11 @@ if ( defined $vendor ) {
open $rcfile, '<', $rcfilename or die "Unable to open $rcfilename for input: $!";
while ( <$rcfile> ) {
next if /\s*#/;
die "Invalid entry ($_) in $rcfile, line $." unless /\s*(\w+)=(.*)/;
next if /^\s*#/;
s/\s*#.*//;
next if /^\s*$/;
chomp;
die "Invalid entry ($_) in $rcfilename, line $." unless /\s*(\w+)=(.*)/;
$options{$1} = $2;
}