octoleo/qpdf
2
1
Fork 0
mirror of https://github.com/qpdf/qpdf.git synced 2024-12-22 10:58:58 +00:00
Code Issues Releases Wiki Activity

Windows perl workaround

Browse Source
This commit is contained in:
Jay Berkenbilt 2022-05-01 19:55:43 -04:00
parent ab01045bcd
commit f5dd63819d
1 changed files with 15 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
libtests/qtest/json_parse.test
View File

@ -12,13 +12,22 @@ require TestDriver;
my $td = new TestDriver('json_parse');
my $json_mod = 0;
eval {
require JSON;
$json_mod = 1;
};
if ($@)
if ($^O ne 'msys')
{
$td->emphasize("JSON.pm not found -- using stored actual outputs");
# Emperical evidence and considerable debugging reveals that in
# some versions of perl (e.g. the one with git bash on the GitHub
# actions Windows 2022 build environment), using the JSON module
# defeats the functionality of binmode when writing test output
# files, thus invalidating NORMALIZE_NEWLINES. This causes test
# failures and spurious upadtes to save files in CI on MSVC.
eval {
require JSON;
$json_mod = 1;
};
if ($@)
{
$td->emphasize("JSON.pm not found -- using stored actual outputs");
}
}
cleanup();