upcase array testing (metafacture/metafacture-fix#170)

hbz · Apr 6, 2022 · 370ca93 · 370ca93
1 parent db4c0af
commit 370ca93
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/t/Catmandu-Fix-upcase.t b/t/Catmandu-Fix-upcase.t
@@ -19,4 +19,7 @@ is_deeply $pkg->new('names.*.name')
     ->fix({names => [{name => 'joe'}, {name => 'rick'}]}),
     {names => [{name => 'JOE'}, {name => 'RICK'}]}, "upcase wildcard values";
 
-done_testing 3;
+is_deeply $pkg->new('data')->fix({data => ['foo', 'bar']}),
+    {data => ['foo', 'bar']}, "array";
+
+done_testing 4;