gnu: clisp: Use modify-phases syntax.

* gnu/packages/lisp.scm (clisp)[arguments]: Use modify-phases syntax.
This commit is contained in:
Ricardo Wurmus 2017-01-01 11:12:29 +01:00
parent 6f7bcaad6a
commit 636c77d066
No known key found for this signature in database
GPG key ID: 197A5888235FACAC

View file

@ -5,6 +5,7 @@
;;; Copyright © 2016 Federico Beffa <beffa@fbengineering.ch>
;;; Copyright © 2016 ng0 <ngillmann@runbox.com>
;;; Copyright © 2016 Andy Patterson <ajpatter@uwaterloo.ca>
;;; Copyright © 2017 Ricardo Wurmus <rekado@elephly.net>
;;;
;;; This file is part of GNU Guix.
;;;
@ -207,8 +208,8 @@ (define-public clisp
;; --build=<triplet>.
#:build #f
#:phases
(alist-cons-after
'unpack 'patch-sh-and-pwd
(modify-phases %standard-phases
(add-after 'unpack 'patch-sh-and-pwd
(lambda _
;; The package is very messy with its references to "/bin/sh" and
;; some other absolute paths to traditional tools. These appear in
@ -218,13 +219,13 @@ (define-public clisp
(substitute* (find-files "." "configure|Makefile")
(("/bin/sh") "sh"))
(substitute* '("src/clisp-link.in")
(("/bin/pwd") "pwd")))
(alist-cons-before
'build 'chdir-to-source
(("/bin/pwd") "pwd"))
#t))
(add-before 'build 'chdir-to-source
(lambda _
;; We are supposed to call make under the src sub-directory.
(chdir "src"))
%standard-phases))
(chdir "src")
#t)))
;; Makefiles seem to have race conditions.
#:parallel-build? #f))
(home-page "http://www.clisp.org/")