01/01: gnu: asciidoc: Use local docbook-xml package.

[Kei Kebreau]

kkebreau pushed a commit to branch master
in repository guix.

commit 3078821d1380c26c738be6b5d430c595327d401f
Author: Kei Kebreau <address@hidden>
Date:   Thu Mar 16 01:37:42 2017 -0400

    gnu: asciidoc: Use local docbook-xml package.
    
    * gnu/packages/documentation.scm (asciidoc)[inputs]: Add docbook-xml.
    [arguments]: Add 'make-local-docbook-xml' phase.
---
 gnu/packages/documentation.scm | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/gnu/packages/documentation.scm b/gnu/packages/documentation.scm
index 94e979c..8b94378 100644
--- a/gnu/packages/documentation.scm
+++ b/gnu/packages/documentation.scm
@@ -83,8 +83,17 @@ release/xsl/current")
                            (string-append (assoc-ref inputs "docbook-xsl")
                                           "/xml/xsl/docbook-xsl-"
                                           ,(package-version docbook-xsl)))))
+                       #t))
+         ;; Do the same for docbook-xml.
+         (add-before 'install 'make-local-docbook-xml
+                     (lambda* (#:key inputs #:allow-other-keys)
+                       (substitute* "docbook45.conf"
+                         
(("http://www.oasis-open.org/docbook/xml/4.5/docbookx.dtd";)
+                          (string-append (assoc-ref inputs "docbook-xml")
+                                         "/xml/dtd/docbook/docbookx.dtd")))
                        #t)))))
     (inputs `(("python" ,python-2)
+              ("docbook-xml" ,docbook-xml)
               ("docbook-xsl" ,docbook-xsl)
               ("libxml2" ,libxml2)
               ("libxslt" ,libxslt)))