--- JSON-XS/t/02_error.t 2007/12/05 10:59:29 1.6 +++ JSON-XS/t/02_error.t 2008/11/20 03:59:53 1.7 @@ -2,6 +2,7 @@ use utf8; use JSON::XS; +no warnings; our $test; sub ok($) {