gnu: mailutils: Use 'modify-phases' syntax.

* gnu/packages/mail.scm (mailutils)[arguments]: Use 'modify-phases'.
This commit is contained in:
Efraim Flashner 2016-12-20 21:55:53 +02:00
parent abe5d2dc8d
commit de75f0b1bf
No known key found for this signature in database
GPG key ID: F4C1D3917EACEE93

View file

@ -113,9 +113,9 @@ (define-public mailutils
"1dpylyg79avi7brpkcmzaq7bqqkz45flp0ws6f2c8b1gyz4hdnzm")))) "1dpylyg79avi7brpkcmzaq7bqqkz45flp0ws6f2c8b1gyz4hdnzm"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
'(;; TODO: Add `--with-sql'. '(#:phases
#:phases (alist-cons-before (modify-phases %standard-phases
'build 'pre-build (add-before 'build 'pre-build
(lambda _ (lambda _
;; Use the right file name for `cat'. ;; Use the right file name for `cat'.
(substitute* "testsuite/lib/mailutils.exp" (substitute* "testsuite/lib/mailutils.exp"
@ -148,8 +148,8 @@ (define-public mailutils
(("\\$\\(SHELL\\) \\$\\(TESTSUITE\\)" all) (("\\$\\(SHELL\\) \\$\\(TESTSUITE\\)" all)
(string-append "-" all))) (string-append "-" all)))
#t) #t)))
%standard-phases) ;; TODO: Add `--with-sql'.
#:configure-flags '("--sysconfdir=/etc") #:configure-flags '("--sysconfdir=/etc")
#:parallel-tests? #f)) #:parallel-tests? #f))
(inputs (inputs