| Subject: | Config-Properties-0.65 - bug in _split_to_tree() |
| Date: | Tue, 14 Aug 2007 14:01:21 +0200 |
| To: | "bug-Config-Properties [...] rt.cpan.org" <bug-Config-Properties [...] rt.cpan.org> |
| From: | Filip Chodounsky <Filip.Chodounsky [...] simac.cz> |
Hi,
I think I have encountered a bug in the function _split_to_tree() of the module Config-Properties-0.65
at the line 343.
$ diff -w corrected/Properties.pm v065/Properties.pm
343c343
< $self->{defaults}->_split_to_tree($tree, $re , $start);
---
Show quoted text
> $self->{defaults}->_split_to_tree($tree, $re);
The correct code should be
sub _split_to_tree {
my ($self, $tree, $re, $start) = @_;
if (defined $self->{defaults}) {
$self->{defaults}->_split_to_tree($tree, $re , $start);
The recursive call of _split_to_tree() processing defaults values is missing the $start argument.
Best Regards
Filip
P.S.
Thank you for a nice handy module !