Handle directives like 'Archive Device =' with no value

This commit is contained in:
Jamie Cameron
2008-01-17 18:14:00 +00:00
parent fe9df470db
commit 63ae5bc1b6

View File

@@ -143,6 +143,18 @@ if (!defined($config_file_cache{$file})) {
$parent = $dir;
}
}
elsif (/^\s*(\S[^=]*\S)\s*=\s*$/) {
# A name = with no value
local $rest = $3;
local $dir = { 'name' => $1,
'value' => undef,
'line' => $lnum,
'eline' => $lnum,
'file' => $file,
'type' => 0,
'parent' => $parent };
push(@{$parent->{'members'}}, $dir);
}
elsif (/^\s*(\S+)\s*{\s*$/) {
# Start of a section
local $dir = { 'name' => $1,