diff options
author | Norbert Preining <preining@logic.at> | 2017-11-09 03:24:09 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2017-11-09 03:24:09 +0000 |
commit | 9b7ca15e5d9f354810221d580290d26d260df6b8 (patch) | |
tree | 04b1562c50cb04cd3403dd8e534184cdf09f0dc0 /Master/tlpkg/TeXLive/TLPOBJ.pm | |
parent | 43f910cd38a469d36aef7baf4403e9513728b939 (diff) |
add home-made json conversion
git-svn-id: svn://tug.org/texlive/trunk@45723 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLPOBJ.pm')
-rw-r--r-- | Master/tlpkg/TeXLive/TLPOBJ.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/Master/tlpkg/TeXLive/TLPOBJ.pm b/Master/tlpkg/TeXLive/TLPOBJ.pm index 0ca7ebb6d19..8dadf1723fd 100644 --- a/Master/tlpkg/TeXLive/TLPOBJ.pm +++ b/Master/tlpkg/TeXLive/TLPOBJ.pm @@ -468,6 +468,11 @@ sub as_json { } $foo{'docfiles'} = [ @newdocf ]; delete($foo{'docfiledata'}); + # + # my home-made solution is a bit faster then JSON::PP + # but we still prefer that one for security ;-) + # If JSON::XS is installed, that is the fastest. + #my $utf8_encoded_json_text = TeXLive::TLUtils::hash_to_json(\%foo); my $utf8_encoded_json_text = JSON::encode_json(\%foo); return $utf8_encoded_json_text; } |