From c8f98009fa544c43e1ad30efdb41b3b16574027d Mon Sep 17 00:00:00 2001 From: Patrick Spek Date: Wed, 26 Apr 2017 23:10:00 +0200 Subject: Rename test files --- t/03-having.t | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) create mode 100644 t/03-having.t (limited to 't/03-having.t') diff --git a/t/03-having.t b/t/03-having.t new file mode 100644 index 0000000..0627ed5 --- /dev/null +++ b/t/03-having.t @@ -0,0 +1,23 @@ +#! /usr/bin/env perl6 + +use v6.c; +use Test; +use lib "lib"; + +plan 4; + +use Config; + +my $config = Config.new(); + +$config.read({ + a => "a", + b => { + c => "c" + } +}); + +ok $config.has("a"), "Check existence of simple key"; +ok $config.has("b.c"), "Check existence of nested key"; +ok $config.has(["a"]), "Check existence of simple key using array"; +ok $config.has(["b", "c"]), "Check existence of nested key using array"; -- cgit v1.1