mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2026-04-06 21:20:33 +02:00
gnu: vis: Remove wrapping of LUA_{,C}PATH and wrap GUIX_LUA_{,C}PATH.
* gnu/packages/text-editors.scm (vis)[arguments]<#:phases>{wrap-binary}: Wrap
GUIX_LUA_PATH and GUIX_LUA_CPATH instead of LUA_PATH and LUA_CPATH.
Change-Id: Id8ff4d37f797c6dba2516241a0ea1c4a20d5451a
Signed-off-by: Andreas Enge <andreas@enge.fr>
This commit is contained in:
committed by
Andreas Enge
parent
d281e4e227
commit
e1fc5936b1
@@ -370,16 +370,10 @@ intuitive, while also taking advantage of the capabilities of modern terminals."
|
||||
(delete 'check) ; the tests need a wrapped vis
|
||||
(add-after 'install 'wrap-binary
|
||||
(lambda* (#:key inputs outputs #:allow-other-keys)
|
||||
(let* ((out (assoc-ref outputs "out"))
|
||||
(lpeg (assoc-ref inputs "lua-lpeg"))
|
||||
(lua-version ,(version-major+minor (package-version lua)))
|
||||
(LUA_PATH (string-append lpeg "/share/lua/"
|
||||
lua-version "/?.lua"))
|
||||
(LUA_CPATH (string-append lpeg "/lib/lua/"
|
||||
lua-version "/?.so")))
|
||||
(let* ((out (assoc-ref outputs "out")))
|
||||
(wrap-program (string-append out "/bin/vis")
|
||||
`("LUA_PATH" ":" prefix (,LUA_PATH))
|
||||
`("LUA_CPATH" ":" prefix (,LUA_CPATH)))
|
||||
`("GUIX_LUA_PATH" ":" prefix (,(getenv "GUIX_LUA_PATH")))
|
||||
`("GUIX_LUA_CPATH" ":" prefix (,(getenv "GUIX_LUA_CPATH"))))
|
||||
#t)))
|
||||
(add-after 'wrap-binary 'check
|
||||
(assoc-ref %standard-phases 'check))
|
||||
|
||||
Reference in New Issue
Block a user