gnu: docbook-xml: Substitute remote xml_catalog uris with local ones.

* gnu/packages/docbook.scm: substitute remote uri with local ones.

1 files changed, 6 insertions, 2 deletions

diff --git a/gnu/packages/docbook.scm b/gnu/packages/docbook.scm
index 1a48d97f9b6..431da7ff473 100644
--- a/gnu/packages/docbook.scm
+++ b/gnu/packages/docbook.scm
@@ -50,8 +50,12 @@
                           (dtd    (string-append out "/xml/dtd/docbook")))
                      (mkdir-p dtd)
                      (with-directory-excursion dtd
-                       (system* unzip source))))
-       #:modules ((guix build utils))))
+                       (system* unzip source))
+                     (substitute* (string-append out "/xml/dtd/docbook/catalog.xml")
+                       (("uri=\"") 
+                        (string-append 
+                         "uri=\"file://" dtd "/")))))
+                 #:modules ((guix build utils))))
     (native-inputs `(("unzip" ,unzip)))
     (home-page "http://docbook.org")
     (synopsis "DocBook XML DTDs for document authoring")