Don't rely on callback order in tests

[gitmo/MooseX-Params-Validate.git] / t / 001_basic.t

diff --git a/t/001_basic.t b/t/001_basic.t
index 97203db..14e8248 100644 (file)
--- a/t/001_basic.t
+++ b/t/001_basic.t
@@ -64,7 +64,7 @@ use Test::Fatal;
             foo => {
                 isa       => 'ArrayRef',
                 callbacks => {
-                    'some random callback' => sub { @{ $_[0] } <= 2 },
+                    'some random callback' => sub { !ref($_[0]) || @{ $_[0] } <= 2 },
                 },
             },
         );