From b140e3d2ce7448399885d68d5e858cab237cedc7 Mon Sep 17 00:00:00 2001 From: steve Date: Wed, 25 Jul 2007 22:45:57 +0000 Subject: [PATCH] 2007-07-25 22:45:57 by steve Updated to skip a false positive. --- tests/argument-check.t | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) diff --git a/tests/argument-check.t b/tests/argument-check.t index 88b5781..fc0e2ba 100644 --- a/tests/argument-check.t +++ b/tests/argument-check.t @@ -5,7 +5,7 @@ # # Steve # -- -# $Id: argument-check.t,v 1.6 2007-06-12 14:05:25 steve Exp $ +# $Id: argument-check.t,v 1.7 2007-07-25 22:45:57 steve Exp $ # use strict; @@ -74,18 +74,21 @@ sub parseConfigFile my $line = ""; - while (defined($line = ) ) + while (defined($line = ) ) { chomp $line; - if ($line =~ s/\\$//) + if ($line =~ s/\\$//) { $line .= ; redo unless eof(FILE); } - + # Skip blank lines next if ( length( $line ) < 1 ); + # skip false positive + next if ( $line =~ /Otherwise/ ); + # Find variable settings if ( $line =~ /([^=]+)=([^\n]+)/ ) {