gnu: xen: Fix build failure.

* gnu/packages/virtualization.scm (xen)[arguments]<#:phases>[set-environment-up]:
Use CPATH instead of C_INCLUDE_PATH, CPLUS_INCLUDE_PATH.
This commit is contained in:
Danny Milosavljevic 2020-04-14 12:02:34 +02:00
parent acaeaa0a29
commit 6177320d78
No known key found for this signature in database
GPG key ID: E71A35542C30BAA5

View file

@ -1290,14 +1290,13 @@ (define (filter-environment! filter-predicate
new-search-path ":")))
(setenv env-name new-env-value)))
environment-variable-names))
(setenv "CROSS_C_INCLUDE_PATH" (getenv "C_INCLUDE_PATH"))
(setenv "CROSS_CPLUS_INCLUDE_PATH" (getenv "CPLUS_INCLUDE_PATH"))
(setenv "CROSS_CPATH" (getenv "CPATH"))
(setenv "CROSS_LIBRARY_PATH" (getenv "LIBRARY_PATH"))
(filter-environment! cross?
'("CROSS_C_INCLUDE_PATH" "CROSS_CPLUS_INCLUDE_PATH"
'("CROSS_CPATH"
"CROSS_LIBRARY_PATH"))
(filter-environment! (lambda (e) (not (cross? e)))
'("C_INCLUDE_PATH" "CPLUS_INCLUDE_PATH"
'("CPATH"
"LIBRARY_PATH"))
;; Guix tries to be helpful and automatically adds
;; mini-os-git-checkout/include to the include path,
@ -1306,7 +1305,7 @@ (define (filter-environment! filter-predicate
(not
(string-contains e
"mini-os-git-checkout")))
'("C_INCLUDE_PATH" "CPLUS_INCLUDE_PATH"
'("CPATH"
"LIBRARY_PATH"))
(setenv "EFI_VENDOR" "guix")
#t))