ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 05:48:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: udisks: Add manpages.

Browse source 
* gnu/packages/freedesktop.scm (udisks)[native-inputs]: Add docbook-xml
and docbook-xsl.
[arguments]: Add #:make-flags to specify XML catalog files for manuals.

Signed-off-by: Marius Bakke <mbakke@fastmail.com>
This commit is contained in:
Maxim Cournoyer 2016-11-11 09:05:45 -08:00 committed by Marius Bakke
parent dbf8f84f15
commit aef5055ff9
No known key found for this signature in database
GPG key ID: A2A06DF2A33A54FA
1 changed files with 19 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

21
gnu/packages/freedesktop.scm
View file

@ -461,7 +461,9 @@ (define-public udisks
"119pr2zbff8vkwlhghim7d7ir24c1dil9hp4q49wm4f6pnrjpbmb")))) "119pr2zbff8vkwlhghim7d7ir24c1dil9hp4q49wm4f6pnrjpbmb"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(native-inputs (native-inputs
`(("glib:bin" ,glib "bin") ; for glib-mkenums `(("docbook-xml" ,docbook-xml-4.3) ; to build the manpages
("docbook-xsl" ,docbook-xsl)
("glib:bin" ,glib "bin") ; for glib-mkenums
("gobject-introspection" ,gobject-introspection) ("gobject-introspection" ,gobject-introspection)
("intltool" ,intltool) ("intltool" ,intltool)
("pkg-config" ,pkg-config) ("pkg-config" ,pkg-config)
@ -480,13 +482,28 @@ (define-public udisks
`(#:tests? #f ; requiring system message dbus `(#:tests? #f ; requiring system message dbus
#:disallowed-references ("doc") ;enforce separation of "doc" #:disallowed-references ("doc") ;enforce separation of "doc"
#:configure-flags #:configure-flags
(list "--disable-man" (list "--enable-man"
"--localstatedir=/var" "--localstatedir=/var"
"--enable-fhs-media" ;mount devices in /media, not /run/media "--enable-fhs-media" ;mount devices in /media, not /run/media
(string-append "--with-html-dir=" (string-append "--with-html-dir="
(assoc-ref %outputs "doc") (assoc-ref %outputs "doc")
"/share/doc/udisks/html") "/share/doc/udisks/html")
(string-append "--with-udevdir=" %output "/lib/udev")) (string-append "--with-udevdir=" %output "/lib/udev"))
#:make-flags
(let* ((docbook-xsl-name-version ,(string-append
(package-name docbook-xsl) "-"
(package-version docbook-xsl)))
(docbook-xsl-catalog-file (string-append
(assoc-ref %build-inputs "docbook-xsl")
"/xml/xsl/"
docbook-xsl-name-version
"/catalog.xml"))
(docbook-xml-catalog-file (string-append
(assoc-ref %build-inputs "docbook-xml")
"/xml/dtd/docbook/catalog.xml")))
;; Reference the catalog files required to build the manpages.
(list (string-append "XML_CATALOG_FILES=" docbook-xsl-catalog-file " "
docbook-xml-catalog-file)))
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-before (add-before