guix_mirror_bot pushed a commit to branch lua-team
in repository guix.
commit 23154d00ff36aa37c0cbc85ba83861a46a44599a
Author: Carlo Zancanaro <[email protected]>
AuthorDate: Wed Feb 4 23:07:11 2026 +1100
gnu: prosody: Remove wrapping of LUA_{,C}PATH and wrap GUIX_LUA_{,C}PATH.
* gnu/packages/messaging.scm (prosody)[arguments]<#:phases>{wrap-programs}:
Wrap GUIX_LUA_PATH and GUIX_LUA_CPATH instead of LUA_PATH and LUA_CPATH.
Change-Id: I5fb6b3f216433261048562e8902c8cf92d22d060
Signed-off-by: Andreas Enge <[email protected]>
---
gnu/packages/messaging.scm | 23 ++---------------------
1 file changed, 2 insertions(+), 21 deletions(-)
diff --git a/gnu/packages/messaging.scm b/gnu/packages/messaging.scm
index 21bd718119..c945da8c4a 100644
--- a/gnu/packages/messaging.scm
+++ b/gnu/packages/messaging.scm
@@ -1481,25 +1481,6 @@ default.")
;; modules at runtime.
(let* ((out (assoc-ref outputs "out"))
(bin (string-append out "/bin/"))
- (deps (delete #f (map (match-lambda
- ((label . directory)
- (if (string-prefix? "lua" label)
- directory #f)))
- inputs)))
- (lua-path (string-join
- (map (lambda (path)
- (string-append
- path "/share/lua/5.2/?.lua;"
- path "/share/lua/5.2/?/?.lua"))
- (cons out deps))
- ";"))
- (lua-cpath (string-join
- (map (lambda (path)
- (string-append
- path "/lib/lua/5.2/?.so;"
- path "/lib/lua/5.2/?/?.so"))
- (cons out deps))
- ";"))
(openssl (assoc-ref inputs "openssl"))
(coreutils (assoc-ref inputs "coreutils"))
(path (map (lambda (dir)
@@ -1507,8 +1488,8 @@ default.")
(list openssl coreutils))))
(for-each (lambda (file)
(wrap-program file
- `("LUA_PATH" ";" = (,lua-path))
- `("LUA_CPATH" ";" = (,lua-cpath))
+ `("GUIX_LUA_PATH" ";" prefix (,(getenv
"GUIX_LUA_PATH")))
+ `("GUIX_LUA_CPATH" ";" prefix (,(getenv
"GUIX_LUA_CPATH")))
`("PATH" ":" prefix ,path)))
(find-files bin ".*"))))))))
(inputs
