me
/
guix
Archived
1
0
Fork 0
Code

gnu: pantalaimon: Install documentation and use gexps. 

* gnu/packages/matrix.scm (pantalaimon)[arguments]: Turn into gexps.  Add
install-doc phase.

Signed-off-by: Nicolas Goaziou <mail@nicolasgoaziou.fr>
master
Morgan Smith 2023-01-11 14:03:09 -05:00 committed by Nicolas Goaziou
parent 6bf7144c79
commit b367f28ed2
No known key found for this signature in database
GPG Key ID: DA00B4F048E92F2D
1 changed files with 23 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

37
gnu/packages/matrix.scm
View File

@ -36,6 +36,7 @@
#:use-module (gnu packages xml) #:use-module (gnu packages xml)
#:use-module (guix build-system python) #:use-module (guix build-system python)
#:use-module (guix download) #:use-module (guix download)
#:use-module (guix gexp)
#:use-module (guix git-download) #:use-module (guix git-download)
#:use-module (guix packages)) #:use-module (guix packages))
@ -248,20 +249,28 @@ fledged batteries-included asyncio layer using aiohttp.")
"16ask8v00654q307c55q5gnm8hrj40gibpab5zl52v4i0bgl9j68")))) "16ask8v00654q307c55q5gnm8hrj40gibpab5zl52v4i0bgl9j68"))))
(build-system python-build-system) (build-system python-build-system)
(arguments (arguments
`(#:phases (list
(modify-phases %standard-phases #:phases
(add-after 'unpack 'downgrade-appdirs-requirement #~(modify-phases %standard-phases
(lambda _ (add-after 'unpack 'downgrade-appdirs-requirement
(substitute* "setup.py" (lambda _
;; FIXME: Remove this once appdirs is updated. (substitute* "setup.py"
;; Upgrading python-appdirs requires rebuilting 3000+ packages, ;; FIXME: Remove this once appdirs is updated.
;; when 1.4.4 is a simple maintenance fix from 1.4.3. ;; Upgrading python-appdirs requires rebuilting 3000+ packages,
(("appdirs >= 1.4.4") "appdirs >= 1.4.3")))) ;; when 1.4.4 is a simple maintenance fix from 1.4.3.
(replace 'check (("appdirs >= 1.4.4") "appdirs >= 1.4.3"))))
(lambda* (#:key tests? inputs outputs #:allow-other-keys) (add-after 'install 'install-doc
(when tests? (lambda _
(add-installed-pythonpath inputs outputs) (with-directory-excursion "docs/man"
(invoke "pytest" "-vv" "tests"))))))) (let ((man (string-append #$output "/share/man")))
(install-file "panctl.1" (string-append man "/man1"))
(install-file "pantalaimon.5" (string-append man "/man5"))
(install-file "pantalaimon.8" (string-append man "/man8"))))))
(replace 'check
(lambda* (#:key tests? inputs outputs #:allow-other-keys)
(when tests?
(add-installed-pythonpath inputs outputs)
(invoke "pytest" "-vv" "tests")))))))
(native-inputs (native-inputs
(list python-aioresponses (list python-aioresponses
python-faker python-faker