From c0b635c15ca7c7f6531279867d8a975f03e25e6c Mon Sep 17 00:00:00 2001 From: John Mertz Date: Tue, 29 Nov 2022 22:21:30 -0500 Subject: [PATCH] Test new filemap method --- t/02_files.t | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/t/02_files.t b/t/02_files.t index 074df91..f03f4b0 100644 --- a/t/02_files.t +++ b/t/02_files.t @@ -16,7 +16,8 @@ my $file = 't/02_files.cf'; ok (!$kw->readFile($file), "Run readFile on $file"); ok ($kw->getFile($file) == $file, "Get current working file"); ok (scalar(keys(%{$kw->{'rules'}})) == 2, "Fetched correct number of files in rules"); -ok ($kw->{'rules'}->{'50_02_T_02_FILES.cf'}, "Loaded correct output name"); +ok ($kw->{'rules'}->{$file}, "Loaded correct hash key"); +ok ($kw->{'filemap'}->{$file} =~ m/50_02_T_02_FILES.cf$/, "Loaded correct output name"); ok (!$kw->clearFiles(), "Clear 'rules' hash"); ok (!$kw->{'rules'}, "Fetched none after clearing");