test for odd number of arguments

[gitmo/Moo.git] / t / buildargs.t

diff --git a/t/buildargs.t b/t/buildargs.t
index 1a541bd..90cd9f8 100644 (file)
--- a/t/buildargs.t
+++ b/t/buildargs.t
@@ -88,6 +88,13 @@ foreach my $class (qw(Qux Quux)) {
     like( $@, qr/Single parameters to new\(\) must be a HASH ref/,
         "new() requires a list or a HASH ref"
     );
+
+    eval {
+        $class->new( bar => 42, baz => 47, 'quux' );
+    };
+    like( $@, qr/You passed an odd number of arguments/,
+        "new() requires a list or a HASH ref"
+    );
 }
 
 done_testing;