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/reading.t | 40 ---------------------------------------- 1 file changed, 40 deletions(-) delete mode 100644 t/reading.t (limited to 't/reading.t') diff --git a/t/reading.t b/t/reading.t deleted file mode 100644 index 0792188..0000000 --- a/t/reading.t +++ /dev/null @@ -1,40 +0,0 @@ -#! /usr/bin/env perl6 - -use v6.c; -use Test; -use lib "lib"; - -plan 5; - -use Config; - -my $config = Config.new(); - -throws-like { $config.read("t/files/none") }, Config::Exception::FileNotFoundException, "Reading nonexisting file"; -throws-like { $config.read("t/files/config") }, Config::Exception::UnknownTypeException, "Reading file of unknown type"; -throws-like { $config.read("t/files/config", "Config::Parser:NoSuchParserForTest") }, Config::Exception::MissingParserException, "Using non-existing parser"; - -my $hash = { - "a" => "a", - "b" => { - "c" => "test" - } -}; - -$config.read($hash); - -is-deeply $config.get(), $hash, "Correctly sets hash"; - -$config.read({ - "b" => { - "d" => "another" - } -}); - -is-deeply $config.get(), { - "a" => "a", - "b" => { - "c" => "test", - "d" => "another" - } -}, "Correctly merges new hash into existing config"; -- cgit v1.1