TakeV/guix
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

gnu: hwinfo: Factorise 'install-man-pages.

Browse source 
* gnu/packages/hardware.scm (hwinfo)[arguments]: Get section numbers
from the man page file names rather than hard-coding 2.
This commit is contained in:
Tobias Geerinckx-Rice 2023-07-16 02:00:00 +02:00
parent f93605b32b
commit 84779e6271
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79
1 changed files with 5 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
gnu/packages/hardware.scm
View file

@ -405,15 +405,11 @@ (define-public hwinfo
(invoke "make" "doc")))
(add-after 'install 'install-man-pages
(lambda _
(let* ((man (string-append #$output "/share/man"))
(man1 (string-append man "/man1"))
(man8 (string-append man "/man8")))
(for-each
(lambda (x) (install-file x man1))
(find-files "doc" "\\.1$"))
(for-each
(lambda (y) (install-file y man8))
(find-files "doc" "\\.8$"))))))))
(for-each
(lambda (file)
(install-file file (string-append #$output "/share/man/man"
(string-take-right file 1))))
(find-files "doc" "\\.[0-9]$")))))))
(native-inputs
(list doxygen flex perl pkg-config))
(inputs