trunk/src/third_party/JSON/JSON-2.59/t/e07_allow_singlequote.t - Issue 16539003: Revert 205057 "Add JSON.pm to third_party"

Keyboard Shortcuts

	File
u :	up to issue
j / k :	jump to file after / before current file
J / K :	jump to next file with a comment after / before current file
	Side-by-side diff
i :	toggle intra-line diffs
e :	expand all comments
c :	collapse all comments
s :	toggle showing all comments
n / p :	next / previous diff chunk or comment
N / P :	next / previous comment
<Up> / <Down> :	next / previous line

	Issue
u :	up to list of issues
j / k :	jump to patch after / before current patch
o / <Enter> :	open current patch in side-by-side view
i :	open current patch in unified diff view

	Issue List
j / k :	jump to issue after / before current issue
o / <Enter> :	open current issue

Unified Diff: trunk/src/third_party/JSON/JSON-2.59/t/e07_allow_singlequote.t

Issue 16539003: Revert 205057 "Add JSON.pm to third_party" (Closed) Base URL: svn://svn.chromium.org/chrome/

Patch Set: Created 7 years, 6 months ago

Use n/p to move between diff chunks; N/P to move between comments. Draft comments are only viewable by you.

Jump to:

Index: trunk/src/third_party/JSON/JSON-2.59/t/e07_allow_singlequote.t

===================================================================

--- trunk/src/third_party/JSON/JSON-2.59/t/e07_allow_singlequote.t (revision 205060)

+++ trunk/src/third_party/JSON/JSON-2.59/t/e07_allow_singlequote.t (working copy)

@@ -1,20 +0,0 @@

-use Test::More;

-use strict;

-BEGIN { plan tests => 4 };

-BEGIN { $ENV{PERL_JSON_BACKEND} = "JSON::backportPP"; }

-use JSON;

-#########################

-my $json = JSON->new->allow_nonref;

-eval q| $json->decode("{'foo':'bar'}") |;

-ok($@); # in XS and PP, the error message differs.

-$json->allow_singlequote;

-is($json->decode(q|{'foo':"bar"}|)->{foo}, 'bar');

-is($json->decode(q|{'foo':'bar'}|)->{foo}, 'bar');

-is($json->allow_barekey->decode(q|{foo:'bar'}|)->{foo}, 'bar');