t/10-minimal.t
changeset 18 e21e904c1320
parent 15 bb7b3ae76cc8
child 20 112e7c316db9
--- a/t/10-minimal.t	Wed Jan 07 15:56:05 2015 +0100
+++ b/t/10-minimal.t	Wed Jan 07 17:14:18 2015 +0100
@@ -34,10 +34,9 @@
 
     # get_domains should read a list of names, either from a file
     # or from the arguments, or from a combination of both
-    is_deeply [get_domains(qw(a b c))], [qw(a b c)] => 'domains from list';
-    is_deeply [get_domains("$tmp")],    [qw(a b c d)] => 'domains from file';
-    is_deeply [get_domains('a', "$tmp", 'z')],
-      [qw(a a b c d z)] => 'domains from args and file';
+    is_deeply [get_domains(sources => [qw/a b c/])], [qw(a b c)] => 'domains from list';
+    is_deeply [get_domains(sources => ["$tmp"])],    [qw(a b c d)] => 'domains from file';
+    is_deeply [get_domains(sources => ['a', "$tmp", 'z'])], [qw(a a b c d z)] => 'domains from args and file';
 
     is_deeply {read_override("$tmp")}, { c => ['ns1', 'ns2'] }, 'override file';