~ruther/guix-local: gnu: luajit: Make available as ‘luajit’.

a093bb69679f7128a0f930ea825a4babe88ca100 — Tobias Geerinckx-Rice 8 years ago 906f1b4

gnu: luajit: Make available as ‘luajit’.

* gnu/packages/lua.scm (luajit)[arguments]: Add a ‘create-luajit-symlink’
phase to make the interpreter available simply as ‘luajit’.

patch browse .tar.gz

1 files changed, 13 insertions(+), 3 deletions(-)

M gnu/packages/lua.scm

M gnu/packages/lua.scm => gnu/packages/lua.scm +13 -3

@@ 127,9 127,19 @@ for configuration, scripting, and rapid prototyping.")
               (patches (search-patches "luajit-no_ldconfig.patch"))))
     (build-system gnu-build-system)
     (arguments
-     '(#:tests? #f                      ;luajit is distributed without tests
-       #:phases (modify-phases %standard-phases (delete 'configure))
-       #:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out")))))
+     `(#:tests? #f                      ; luajit is distributed without tests
+       #:phases
+       (modify-phases %standard-phases
+         (delete 'configure)            ; no configure script
+         (add-after 'install 'create-luajit-symlink
+           (lambda* (#:key outputs #:allow-other-keys)
+             (let* ((out (assoc-ref outputs "out"))
+                    (bin (string-append out "/bin")))
+               (with-directory-excursion bin
+                 (symlink ,(string-append name "-" version)
+                          ,name)
+                 #t)))))
+         #:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out")))))
     (home-page "http://www.luajit.org/")
     (synopsis "Just in time compiler for Lua programming language version 5.1")
     (description