gnu: aegis: Use 'modify-phases'.

* gnu/packages/version-control.scm (aegis)[arguments]: Use 'modify-phases'.
This commit is contained in:
Efraim Flashner 2016-07-22 17:34:57 +03:00
parent 2ce516d359
commit 8ef843c711
No known key found for this signature in database
GPG key ID: F4C1D3917EACEE93

View file

@ -964,8 +964,8 @@ (define-public aegis
"--sharedstatedir=/var/com/aegis")
#:parallel-build? #f ; There are some nasty racy rules in the Makefile.
#:phases
(alist-cons-before
'configure 'pre-conf
(modify-phases %standard-phases
(add-before 'configure 'pre-conf
(lambda _
(substitute* (append '("configure"
"etc/check-tar-gz.sh"
@ -981,9 +981,8 @@ (define-public aegis
"libaegis/getpw_cache.cc")
(find-files "test" "\\.sh"))
(("/bin/sh") (which "sh")))
(setenv "SH" (which "sh")))
(alist-replace
'check
(setenv "SH" (which "sh"))))
(replace 'check
(lambda _
(let ((home (string-append (getcwd) "/my-new-home")))
;; Some tests need to write to $HOME.
@ -995,8 +994,7 @@ (define-public aegis
(("type lex") "type flex"))
;; The author decided to call the check rule "sure".
(zero? (system* "make" "sure"))))
%standard-phases))))
(zero? (system* "make" "sure"))))))))
(home-page "http://aegis.sourceforge.net")
(synopsis "Project change supervisor")
(description "Aegis is a project change supervisor, and performs some of