michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-06-05 04:40:24 +01:00
Code Issues Actions 3 Packages Projects Releases Wiki Activity

Fix to avoid large diffs when pretty

Browse Source
This commit is contained in:
Ilia Ross
2026-05-22 15:06:37 +02:00
parent 752d43adb8
commit 87db158afc
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
web-lib-funcs.pl
View File

@@ -13315,7 +13315,7 @@ return 0;
Converts the given Perl data structure to encoded binary string
=item data parameter is a hash/array reference
=item if the output should be prettified
=item if the output should be prettified and hash keys sorted
=item raw-utf8 parameter, if set to 1, encodes data using UTF-8
=cut
@@ -13334,6 +13334,7 @@ else {
error("Neither JSON::XS nor JSON::PP Perl module is available on your system");
}
$json->pretty(!!$pretty);
$json->canonical(1) if ($pretty);
$data ||= {};
return $raw_utf8 ? $json->utf8->encode($data) : $json->latin1->encode($data);
}