|
@@ -542,8 +542,11 @@ sub dump_section {
|
|
$new_start_line = 0;
|
|
$new_start_line = 0;
|
|
} else {
|
|
} else {
|
|
if (defined($sections{$name}) && ($sections{$name} ne "")) {
|
|
if (defined($sections{$name}) && ($sections{$name} ne "")) {
|
|
- print STDERR "${file}:$.: warning: duplicate section name '$name'\n";
|
|
|
|
- ++$warnings;
|
|
|
|
|
|
+ # Only warn on user specified duplicate section names.
|
|
|
|
+ if ($name ne $section_default) {
|
|
|
|
+ print STDERR "${file}:$.: warning: duplicate section name '$name'\n";
|
|
|
|
+ ++$warnings;
|
|
|
|
+ }
|
|
$sections{$name} .= $contents;
|
|
$sections{$name} .= $contents;
|
|
} else {
|
|
} else {
|
|
$sections{$name} = $contents;
|
|
$sections{$name} = $contents;
|