diff options
Diffstat (limited to 't/TestConfig.pm')
-rw-r--r-- | t/TestConfig.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/TestConfig.pm b/t/TestConfig.pm index de1ade9..847ff0c 100644 --- a/t/TestConfig.pm +++ b/t/TestConfig.pm | |||
@@ -19,7 +19,7 @@ sub new { | |||
19 | my $i = 1; | 19 | my $i = 1; |
20 | while ((my $k = shift @$config) && (my $v = shift @$config)) { | 20 | while ((my $k = shift @$config) && (my $v = shift @$config)) { |
21 | # while (my ($k,$v) = each %$config) { | 21 | # while (my ($k,$v) = each %$config) { |
22 | $self->add_node($k, $v, new Config::Tree::Locus('input', $i++)); | 22 | $self->add_value($k, $v, new Config::Tree::Locus('input', $i++)); |
23 | } | 23 | } |
24 | $self->commit; | 24 | $self->commit; |
25 | if (@{$self->{_expected_errors}}) { | 25 | if (@{$self->{_expected_errors}}) { |