diff options
Diffstat (limited to 't/conf11.t')
-rw-r--r-- | t/conf11.t | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/t/conf11.t b/t/conf11.t new file mode 100644 index 0000000..13516b8 --- /dev/null +++ b/t/conf11.t | |||
@@ -0,0 +1,17 @@ | |||
1 | # -*- perl -*- | ||
2 | use lib qw(t lib); | ||
3 | use strict; | ||
4 | use Test; | ||
5 | use TestConfig; | ||
6 | |||
7 | plan(tests => 3); | ||
8 | |||
9 | my $cfg = new TestConfig( | ||
10 | config => [ | ||
11 | 'core.retain-interval' => 10, | ||
12 | 'core.tempdir' => '/tmp' | ||
13 | ] | ||
14 | ); | ||
15 | ok(join(',', $cfg->getnode('core')->keys), 'retain-interval,tempdir'); | ||
16 | ok($cfg->getnode('core')->keys, 2); | ||
17 | ok(join(',', sort $cfg->names_of('core')), 'retain-interval,tempdir'); | ||