gnu: calcurse: Fix documentation directory.

* gnu/packages/calcurse.scm (calcurse)[arguments]: Set ‘--docdir’
in #:configure-flags' and add ‘respect-docdir’ phase to use it.
master
Tobias Geerinckx-Rice 2019-03-04 19:02:52 +01:00
parent ad257ec8b5
commit 02eae558fc
No known key found for this signature in database
GPG Key ID: 0DB0FF884F556D79
1 changed files with 13 additions and 3 deletions

View File

@ -1,7 +1,7 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2014, 2015, 2017 Eric Bavier <bavier@member.fsf.org>
;;; Copyright © 2017 Leo Famulari <leo@famulari.name>
;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr>
;;;
;;; This file is part of GNU Guix.
;;;
@ -46,15 +46,25 @@
;; The ical tests all want to create a ".calcurse" directory, and may
;; fail with "cannot create directory '.calcurse': File exists" if run
;; concurently.
`(#:parallel-tests? #f
`(#:configure-flags
(list (string-append "--docdir=" (assoc-ref %outputs "out")
"/share/doc/" ,name "-" ,version))
#:parallel-tests? #f
;; Since this tzdata is only used for tests and not referenced by the
;; built package, used the "fixed" obsolete version of tzdata and ensure
;; it does not sneak in to the closure.
#:disallowed-references (,tzdata-for-tests)
#:phases (modify-phases %standard-phases
(add-after 'unpack 'respect-docdir
;; doc/Makefile disregards ./configure's --docdir option.
(lambda _
(substitute* "doc/Makefile.in"
(("(docdir =) .*" _ match)
(format "~a @docdir@\n" match)))
#t))
(add-before 'check 'check-setup
(lambda* (#:key inputs #:allow-other-keys)
(setenv "TZDIR" ;for test/ical-007.sh
(setenv "TZDIR" ; for test/ical-007.sh
(string-append (assoc-ref inputs "tzdata")
"/share/zoneinfo")))))))
(home-page "https://www.calcurse.org")