nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

gnu: bigloo: Use 'modify-phases' syntax. 

* gnu/packages/scheme.scm (bigloo)[arguments]: Use 'modify-phases' syntax.
This commit is contained in:
Efraim Flashner 2016-10-23 11:36:27 +03:00
parent 04014de6f5
commit fb685df8f8
No known key found for this signature in database
GPG Key ID: F4C1D3917EACEE93
1 changed files with 46 additions and 47 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
gnu/packages/scheme.scm
View File

@ -205,8 +205,9 @@ features an integrated Emacs-like editor and a large runtime library.")
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:test-target "test" `(#:test-target "test"
#:phases (alist-replace #:phases
'configure (modify-phases %standard-phases
(replace 'configure
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(substitute* "configure" (substitute* "configure"
@ -247,16 +248,14 @@ features an integrated Emacs-like editor and a large runtime library.")
(string-append "--rm=" (which "rm")) (string-append "--rm=" (which "rm"))
(string-append "--ldflags=-Wl,-rpath=" (string-append "--ldflags=-Wl,-rpath="
(assoc-ref outputs "out") (assoc-ref outputs "out")
"/lib/bigloo/" ,version))))) "/lib/bigloo/" ,version))))))
(alist-cons-after (add-after 'install 'install-emacs-modes
'install 'install-emacs-modes
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
(dir (string-append out "/share/emacs/site-lisp"))) (dir (string-append out "/share/emacs/site-lisp")))
(zero? (system* "make" "-C" "bmacs" "all" "install" (zero? (system* "make" "-C" "bmacs" "all" "install"
(string-append "EMACSBRAND=emacs24") (string-append "EMACSBRAND=emacs24")
(string-append "EMACSDIR=" dir))))) (string-append "EMACSDIR=" dir)))))))))
%standard-phases))))
(inputs (inputs
`(("emacs" ,emacs) ;UDE needs the X version of Emacs `(("emacs" ,emacs) ;UDE needs the X version of Emacs