From 2d72a39c9b0c27ddf2ab6b6aaf7760331ac15dae Mon Sep 17 00:00:00 2001
From: Slaven Rezic <
[email protected]>
Date: Sun, 2 Dec 2018 12:13:02 +0100
Subject: [PATCH] fix number of skipped tests
---
t/x02_error.t | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/t/x02_error.t b/t/x02_error.t
index e82cc47..cbe7f2f 100644
--- a/t/x02_error.t
+++ b/t/x02_error.t
@@ -1,6 +1,7 @@
use strict;
use Test::More;
-BEGIN { plan tests => 32 };
+my $tests; BEGIN { $tests = 32 };
+BEGIN { plan tests => $tests };
BEGIN { $ENV{PERL_JSON_BACKEND} ||= 1; }
@@ -15,7 +16,7 @@ use utf8;
use JSON;
SKIP: {
- skip "can't use JSON::XS.", 31, unless( JSON->backend->is_xs );
+ skip "can't use JSON::XS.", $tests, unless( JSON->backend->is_xs );
eval { JSON->new->encode ([\-1]) }; ok $@ =~ /cannot encode reference/;
eval { JSON->new->encode ([\undef]) }; ok $@ =~ /cannot encode reference/;
--
2.1.4