me/guix
Archived
1
0
Fork 0
Code Activity

gnu: hwloc: Add "doc" output.

Browse source 
* gnu/packages/mpi.scm (hwloc-1)[outputs]: Add "doc".
[arguments]: Add 'move-man3-pages' phase.
This commit is contained in:
Ludovic Courtès 2020-11-25 22:47:39 +01:00
parent d6d5a67e75
commit 305eefc062
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 10 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
gnu/packages/mpi.scm
View file

@ -69,6 +69,7 @@
(build-system gnu-build-system) (build-system gnu-build-system)
(outputs '("out" ;'lstopo' & co., depends on Cairo, libx11, etc. (outputs '("out" ;'lstopo' & co., depends on Cairo, libx11, etc.
"lib" ;small closure "lib" ;small closure
"doc" ;400+ section 3 man pages
"debug")) "debug"))
(inputs (inputs
`(("libx11" ,libx11) `(("libx11" ,libx11)
@ -114,6 +115,15 @@
(substitute* (string-append lib "/lib/pkgconfig/hwloc.pc") (substitute* (string-append lib "/lib/pkgconfig/hwloc.pc")
(("^.*prefix=.*$") (("^.*prefix=.*$")
"")) ""))
#t)))
(add-after 'install 'move-man3-pages
(lambda* (#:key outputs #:allow-other-keys)
;; Move section 3 man pages to the "doc" output.
(let ((out (assoc-ref outputs "out"))
(doc (assoc-ref outputs "doc")))
(copy-recursively (string-append out "/share/man/man3")
(string-append doc "/share/man/man3"))
(delete-file-recursively (string-append out "/share/man/man3"))
#t)))))) #t))))))
(home-page "https://www.open-mpi.org/projects/hwloc/") (home-page "https://www.open-mpi.org/projects/hwloc/")
(synopsis "Abstraction of hardware architectures") (synopsis "Abstraction of hardware architectures")