From: pcanterino <> Date: Fri, 31 Dec 2004 14:36:50 +0000 (+0000) Subject: When parsing a configuration file, ignore lines like that: X-Git-Tag: version_2_3~10 X-Git-Url: https://git.p6c8.net/devedit.git/commitdiff_plain/83d16ffce3d208854a53647d8644e3498db9689c When parsing a configuration file, ignore lines like that: = Value --- diff --git a/modules/Config/DevEdit.pm b/modules/Config/DevEdit.pm index 4077b30..9b3cc6c 100644 --- a/modules/Config/DevEdit.pm +++ b/modules/Config/DevEdit.pm @@ -6,7 +6,7 @@ package Config::DevEdit; # Read and parse the configuration files # # Author: Patrick Canterino -# Last modified: 2004-11-24 +# Last modified: 2004-12-31 # use strict; @@ -63,7 +63,7 @@ sub parse_config($) foreach my $line(@lines) { next if($line =~ /^\s*#/); - next if($line !~ /^.+=.+$/); + next if($line !~ /^\s*\S+\s*=.+$/); my ($key,$value) = split(/=/,$line,2);