fix perl cross compiling
Some checks failed
pyrite-dev/milsko/pipeline/head There was a failure building this commit
Some checks failed
pyrite-dev/milsko/pipeline/head There was a failure building this commit
This commit is contained in:
parent
bf03674b5d
commit
4517ca24c3
1 changed files with 13 additions and 6 deletions
17
configure
vendored
17
configure
vendored
|
|
@ -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);
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue