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; |