Skip to content
Snippets Groups Projects
Verified Commit 2506544e authored by Andreas Romeyke's avatar Andreas Romeyke
Browse files

- fixed warning if config entry was undefined

parent a992c54f
No related branches found
No related tags found
No related merge requests found
...@@ -63,17 +63,14 @@ BEGIN { ...@@ -63,17 +63,14 @@ BEGIN {
} }
sub _override_config ($override, $opt) { sub _override_config ($override, $opt) {
#no warnings;
if (exists $opt->{$override}) { if (exists $opt->{$override}) {
if (!exists $config{$override}) { if (!exists $config{$override}) {
$config{$override} = $opt->{$override}; $config{$override} = $opt->{$override};
} }
if ( if (!defined $config{$override}) {
(!defined $config{$override}) $config{$override} = ""; # set temporary to empty string
or ($config{$override} ne $opt->{$override}) }
) { if ($config{$override} ne $opt->{$override}) {
#use Data::Printer; p($override); p(%config); p($opt);
say STDERR <<"HINT"; say STDERR <<"HINT";
Hint: override local config with: Hint: override local config with:
$override => $opt->{$override} (config: $config{$override}) $override => $opt->{$override} (config: $config{$override})
...@@ -81,7 +78,6 @@ HINT ...@@ -81,7 +78,6 @@ HINT
$config{$override} = $opt->{$override}; $config{$override} = $opt->{$override};
} }
} }
#use warnings;
return 1; return 1;
} }
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment