gnu: fnlfmt: Set GUIX_LUA_PATH instead of LUA_PATH.

* gnu/packages/lua.scm (fnlfmt)[arguments]<#:phases>{wrap}: Wrap GUIX_LUA_PATH
instead of LUA_PATH.

Change-Id: Ib37d11062d768629c974c2ea53267971275e0613
Signed-off-by: Andreas Enge <andreas@enge.fr>

1 files changed, 3 insertions, 7 deletions

diff --git a/gnu/packages/lua.scm b/gnu/packages/lua.scm
index c40e4ed94fe..3a1b33369fa 100644
--- a/gnu/packages/lua.scm
+++ b/gnu/packages/lua.scm
@@ -1734,14 +1734,10 @@ This compiler does the opposite of what the Fennel compiler does.")
                       (install-file file bin))
             (find-files "." "fnlfmt")))))
         (add-after 'install 'wrap
-         (lambda* (#:key inputs native-inputs outputs #:allow-other-keys)
-          (let* ((all-inputs (or native-inputs inputs))
-                 (fnlfmt (assoc-ref outputs "out"))
-                 (lua-version ,(version-major+minor (package-version lua)))
-                 (fennel (assoc-ref all-inputs "fennel")))
+         (lambda* (#:key outputs #:allow-other-keys)
+          (let* ((fnlfmt (assoc-ref outputs "out")))
            (wrap-program (string-append fnlfmt "/bin/fnlfmt")
-            `("LUA_PATH" ";" suffix
-              (,(format #f "~a/share/lua/~a/?.lua" fennel lua-version))))
+             `("GUIX_LUA_PATH" ";" suffix (,(getenv "GUIX_LUA_PATH"))))
            #t))))))
     (inputs (list bash-minimal))
     (native-inputs (list lua fennel))