diff options
author | Sergey Poznyakoff <gray@gnu.org> | 2019-03-15 12:11:09 +0200 |
---|---|---|
committer | Sergey Poznyakoff <gray@gnu.org> | 2019-03-15 12:11:09 +0200 |
commit | 66972a8ed32f71ad5ef46bb54e443aa6d99b2723 (patch) | |
tree | dd41ae77e39b1d7f4b055f757347df12fde0d00d | |
parent | 0208b90b5142ec3ebd83a0b578911f4a13fbb093 (diff) | |
download | acmeman-66972a8ed32f71ad5ef46bb54e443aa6d99b2723.tar.gz acmeman-66972a8ed32f71ad5ef46bb54e443aa6d99b2723.tar.bz2 |
Bugfix
* lib/App/Acmeman/Config.pm (_fixup): Use @path argument when
passing pathnames.
-rw-r--r-- | lib/App/Acmeman/Config.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/App/Acmeman/Config.pm b/lib/App/Acmeman/Config.pm index 614a46a..f566cb7 100644 --- a/lib/App/Acmeman/Config.pm +++ b/lib/App/Acmeman/Config.pm @@ -257,3 +257,3 @@ sub _fixup { if (_is_section_ref($vref)) { - $self->_fixup($d->{section}, $vref, @_, $name); + $self->_fixup($d->{section}, $vref, @path, $name); } @@ -266,3 +266,3 @@ sub _fixup { } - $self->_fixup($d->{section}, $section->{$k}, @_, $k); + $self->_fixup($d->{section}, $section->{$k}, @path, $k); delete $section->{$k} @@ -275,6 +275,6 @@ sub _fixup { ? "mandatory section [" - . join(' ', @_, $k) + . join(' ', @path, $k) . "] not present" : "mandatory variable \"" - . join('.', @_, $k) + . join('.', @path, $k) . "\" not set"); |