| Index: trunk/src/third_party/JSON/JSON-2.59/t/_unicode_handling.pm
|
| ===================================================================
|
| --- trunk/src/third_party/JSON/JSON-2.59/t/_unicode_handling.pm (revision 205060)
|
| +++ trunk/src/third_party/JSON/JSON-2.59/t/_unicode_handling.pm (working copy)
|
| @@ -1,28 +0,0 @@
|
| -#package utf8;
|
| -package _unicode_handling;
|
| -
|
| -# this is a dummy pragma for 5.005.
|
| -
|
| - if ($] < 5.006) {
|
| - $INC{'utf8.pm'} = './utf8.pm';
|
| -
|
| - eval q|
|
| - sub utf8::import { }
|
| - sub utf8::unimport { }
|
| - |;
|
| -
|
| - $JSON::can_handle_UTF16_and_utf8 = 0;
|
| - }
|
| - else {
|
| - $JSON::can_handle_UTF16_and_utf8 = 1;
|
| -
|
| - if ($] > 5.007 and $] < 5.008003) {
|
| -# $JSON::can_handle_UTF16_and_utf8 = 0;
|
| - }
|
| -
|
| - }
|
| -
|
| -
|
| -
|
| -
|
| -1;
|
|
|