mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-25 22:08:16 -05:00
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:
parent
acaeaa0a29
commit
6177320d78
1 changed files with 4 additions and 5 deletions
|
@ -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))
|
||||
|
|
Loading…
Reference in a new issue