gnu: mailutils: Update to 3.3.
* gnu/packages/mail.scm (mailutils): Update to 3.3. [arguments]: Rename 'pre-build' phase to 'prepare-test-suite', and move after 'check'. Set 'HOME', and create ~/.mh_profile.master
parent
8cb537acbc
commit
baa6790b4c
|
@ -1,5 +1,5 @@
|
|||
;;; GNU Guix --- Functional package management for GNU
|
||||
;;; Copyright © 2013, 2014, 2015, 2016 Ludovic Courtès <ludo@gnu.org>
|
||||
;;; Copyright © 2013, 2014, 2015, 2016, 2017 Ludovic Courtès <ludo@gnu.org>
|
||||
;;; Copyright © 2014, 2015, 2017 Mark H Weaver <mhw@netris.org>
|
||||
;;; Copyright © 2014 Ian Denhardt <ian@zenhack.net>
|
||||
;;; Copyright © 2014 Sou Bunnbu <iyzsong@gmail.com>
|
||||
|
@ -117,19 +117,19 @@
|
|||
(define-public mailutils
|
||||
(package
|
||||
(name "mailutils")
|
||||
(version "3.2")
|
||||
(version "3.3")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri (string-append "mirror://gnu/mailutils/mailutils-"
|
||||
version ".tar.bz2"))
|
||||
(sha256
|
||||
(base32
|
||||
"0c06yj5hgqibi24ib9sx865kq6i1h18wn201g6iwcfbpi2a7psdm"))))
|
||||
"1v110avpdz0bvz3yh3cfvvd0dnn7sa6hrpql2h8dgnri8fww6cag"))))
|
||||
(build-system gnu-build-system)
|
||||
(arguments
|
||||
'(#:phases
|
||||
(modify-phases %standard-phases
|
||||
(add-before 'build 'pre-build
|
||||
(add-before 'check 'prepare-test-suite
|
||||
(lambda _
|
||||
;; Use the right file name for `cat'.
|
||||
(substitute* "testsuite/lib/mailutils.exp"
|
||||
|
@ -162,6 +162,17 @@
|
|||
(("\\$\\(SHELL\\) \\$\\(TESTSUITE\\)" all)
|
||||
(string-append "-" all)))
|
||||
|
||||
;; 'frm' tests expect write access to $HOME.
|
||||
(setenv "HOME" (getcwd))
|
||||
|
||||
;; Avoid the message "I'm going to create the standard MH path
|
||||
;; for you", which would lead to one test failure (when diffing
|
||||
;; stdout of 'fmtcheck'.)
|
||||
(call-with-output-file ".mh_profile"
|
||||
(lambda (port)
|
||||
(format port "Path: ~a/Mail-for-tests~%"
|
||||
(getcwd))))
|
||||
|
||||
#t)))
|
||||
;; TODO: Add `--with-sql'.
|
||||
#:configure-flags '("--sysconfdir=/etc")
|
||||
|
|
Reference in New Issue