diff options
author | Ricardo Wurmus <rekado@elephly.net> | 2016-07-13 21:23:40 +0200 |
---|---|---|
committer | Ricardo Wurmus <rekado@elephly.net> | 2016-07-16 17:19:22 +0200 |
commit | 2352c97df40c2f1de283a1f217b7a6566c91dfe4 (patch) | |
tree | 7ff64cab5e0ef19f8d90adde4fbcdb0b95ff09da /gnu | |
parent | 1187a27112be10f2ff74144f50c88714ccf30301 (diff) | |
download | guix-2352c97df40c2f1de283a1f217b7a6566c91dfe4.tar guix-2352c97df40c2f1de283a1f217b7a6566c91dfe4.tar.gz |
gnu: geda-gaf: Use modify-phases syntax.
* gnu/packages/engineering.scm (geda-gaf)[arguments]: Use modify-phases
syntax.
Diffstat (limited to 'gnu')
-rw-r--r-- | gnu/packages/engineering.scm | 13 |
1 files changed, 6 insertions, 7 deletions
diff --git a/gnu/packages/engineering.scm b/gnu/packages/engineering.scm index 9066386646..3b1bcbd777 100644 --- a/gnu/packages/engineering.scm +++ b/gnu/packages/engineering.scm @@ -121,13 +121,12 @@ plans and designs.") (build-system gnu-build-system) (arguments '(#:phases - ;; tests require a writable HOME - (alist-cons-before - 'check 'set-home - (lambda _ - (setenv "HOME" (getenv "TMPDIR"))) - %standard-phases - ) + (modify-phases %standard-phases + ;; tests require a writable HOME + (add-before 'check 'set-home + (lambda _ + (setenv "HOME" (getenv "TMPDIR")) + #t))) #:configure-flags (let ((pcb (assoc-ref %build-inputs "pcb"))) (list (string-append "--with-pcb-datadir=" pcb "/share") |