ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-11 13:49:23 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: geda-gaf: Use modify-phases syntax.

Browse source 
* gnu/packages/engineering.scm (geda-gaf)[arguments]: Use modify-phases
  syntax.
This commit is contained in:
Ricardo Wurmus 2016-07-13 21:23:40 +02:00
parent 1187a27112
commit 2352c97df4
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 6 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
gnu/packages/engineering.scm
View file

@ -121,13 +121,12 @@ (define-public geda-gaf
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
'(#:phases '(#:phases
;; tests require a writable HOME (modify-phases %standard-phases
(alist-cons-before ;; tests require a writable HOME
'check 'set-home (add-before 'check 'set-home
(lambda _ (lambda _
(setenv "HOME" (getenv "TMPDIR"))) (setenv "HOME" (getenv "TMPDIR"))
%standard-phases #t)))
)
#:configure-flags #:configure-flags
(let ((pcb (assoc-ref %build-inputs "pcb"))) (let ((pcb (assoc-ref %build-inputs "pcb")))
(list (string-append "--with-pcb-datadir=" pcb "/share") (list (string-append "--with-pcb-datadir=" pcb "/share")