mirror of
https://codeberg.org/scip/Config-General.git
synced 2025-12-16 20:21:01 +01:00
2.38
- fixed rt.cpan.org#31529 variable inheritance failed with multiple named blocks. - fixed rt.cpan.org#33447, regex to catch variable names were too strict, now - . + or : are allowed too. - fixed rt.cpan.org#33385 and #32978 - using arrayrefs as param to -String didn't work anymore (sic) - fixed rt.cpan.org#33216 - variable stack were not properly re-constructed for pre-existing variables if -MergeDuplicateOptions is turned on. git-svn-id: http://dev.catalyst.perl.org/repos/Config-General/trunk@64 be1acefe-a474-0410-9a34-9b3221f2030f
This commit is contained in:
9
t/run.t
9
t/run.t
@@ -8,7 +8,7 @@
|
||||
|
||||
|
||||
use Data::Dumper;
|
||||
use Test::More tests => 43;
|
||||
use Test::More tests => 45;
|
||||
#use Test::More qw(no_plan);
|
||||
|
||||
### 1
|
||||
@@ -450,3 +450,10 @@ foreach my $pos (40 .. 43) {
|
||||
};
|
||||
ok($@ =~ /^Config::General/, "$pos: Structural error checks");
|
||||
}
|
||||
|
||||
my $conf44;
|
||||
eval {
|
||||
$conf44 = new Config::General(-String => [ 'foo bar' ]);
|
||||
};
|
||||
ok(! $@, "-String arrayref");
|
||||
is_deeply({ $conf44->getall }, { foo => 'bar' }, "-String arrayref contents");
|
||||
|
||||
Reference in New Issue
Block a user