1
0
mirror of synced 2026-02-27 00:39:51 +00:00

Fix some whitespace issues in t/argument-check.t

This commit is contained in:
Axel Beckert
2012-11-28 00:04:25 +01:00
parent 16dd2d9f2f
commit ab9b033068

View File

@@ -72,7 +72,7 @@ sub parseConfigFile
open( FILE, "<", $file ) or die "Cannot read file '$file' - $!";
my $line = "";
my $line = "";
while (defined($line = <FILE>) )
{
@@ -106,7 +106,7 @@ sub parseConfigFile
$key =~ s/\s+$//;
$val =~ s/^\s+//;
$val =~ s/\s+$//;
next if ( $key =~ /--/ );
# Store value.
@@ -120,8 +120,6 @@ sub parseConfigFile
}
=head2 readFile
Read a named file and return an array of its contents.