fix perl cross compiling
Some checks failed
pyrite-dev/milsko/pipeline/head There was a failure building this commit

This commit is contained in:
IoIxD 2026-07-17 17:53:53 -07:00
commit 4517ca24c3

17
configure vendored
View file

@ -101,13 +101,20 @@ sub def_platform {
param_set("x11", 1);
}
if($target eq "Windows") {
use Win32;
my ( $osvername, $major, $minor, $id ) = Win32::GetOSVersion();
if ($^O eq "Win32")
{
require Win32;
Win32->import();
my ( $osvername, $major, $minor, $id ) = Win32::GetOSVersion();
if($major >= 10) {
param_set("directwrite", 1);
if($major >= 10) {
param_set("directwrite", 1);
} else {
param_set("directwrite", 0);
}
} else {
param_set("directwrite", 0);
# assume cross compiling
param_set("directwrite", 1);
}
} else {
param_set("directwrite", 0);