ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 22:08:16 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: clisp: Use modify-phases syntax.

Browse source 
* 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
1 changed files with 19 additions and 18 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
gnu/packages/lisp.scm
View file

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