diff options
author | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2021-10-17 03:23:39 -0400 |
---|---|---|
committer | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2021-11-11 12:18:14 -0500 |
commit | 0dc52fc25a7ad44f955be9b1f19827da1fba8af9 (patch) | |
tree | 6529bf251e84a09c5d3d50b7c658b80cb3c42324 /gnu | |
parent | ff28af501d03d5b1bd4fbfc25f5785e611b50976 (diff) |
gnu: Add docbook-xsl-ns.
* gnu/packages/docbook.scm (docbook-xsl-ns): New variable.
Diffstat (limited to 'gnu')
-rw-r--r-- | gnu/packages/docbook.scm | 56 |
1 files changed, 56 insertions, 0 deletions
diff --git a/gnu/packages/docbook.scm b/gnu/packages/docbook.scm index 4d15ac4812..1a1f963821 100644 --- a/gnu/packages/docbook.scm +++ b/gnu/packages/docbook.scm @@ -41,6 +41,7 @@ #:use-module (guix packages) #:use-module (guix download) #:use-module ((guix build utils) #:select (alist-replace)) + #:use-module (guix build-system copy) #:use-module (guix build-system gnu) #:use-module (guix build-system trivial) #:use-module (guix build-system python)) @@ -229,6 +230,61 @@ by no means limited to these applications.) This package provides XML DTDs.") "This package provides XSL style sheets for DocBook.") (license (license:x11-style "" "See 'COPYING' file.")))) +(define-public docbook-xsl-ns + (package + (name "docbook-xsl-ns") + (version "1.79.1") + (source (origin + (method url-fetch) + (uri (string-append "mirror://sourceforge/docbook/" + name "/" version "/" + name "-" version ".tar.bz2")) + (sha256 + (base32 + "170ggf5dgjar65kkn5n33kvjr3pdinpj66nnxfx8b2avw0k91jin")))) + (build-system copy-build-system) + (outputs '("out" "doc")) + (arguments + `(#:phases + (modify-phases %standard-phases + ;; XXX: The copy-build-system doesn't seem to allow installing to a + ;; different output. + (replace 'install + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (xml (string-append out "/xml/xsl/" ,name "-" ,version)) + (doc (string-append (assoc-ref %outputs "doc") + "/share/doc/" ,name "-" ,version)) + (select-rx (make-regexp + "(\\.xml$|\\.xsl$|\\.dtd$|\\.ent$)"))) + ;; Install catalog. + (install-file "catalog.xml" xml) + (install-file "VERSION.xsl" xml) + (substitute* (string-append xml "/catalog.xml") + (("rewritePrefix=\"./") + (string-append "rewritePrefix=\"file://" xml "/"))) + ;; Install style sheets. + (for-each (lambda (dir) + (for-each (lambda (f) + (install-file + f (string-append xml "/" (dirname f)))) + (find-files dir select-rx))) + '("assembly" "common" "eclipse" "epub" "epub3" "fo" + "highlighting" "html" "htmlhelp" "javahelp" "lib" + "manpages" "params" "profiling" "roundtrip" + "template" "website" + "xhtml" "xhtml-1_1" "xhtml5")) + ;; Install documentation. + (install-file "NEWS" doc) + (install-file "RELEASE-NOTES.html" doc) + (copy-recursively "slides" doc) + (copy-recursively "webhelp" doc))))))) + (home-page "https://docbook.org") + (synopsis "DocBook XSL namespaced style sheets for document authoring") + (description "This package provides the @emph{namespaced} XSL style sheets +for DocBook.") + (license (license:x11-style "" "See 'COPYING' file.")))) + (define-public docbook-dsssl (package (name "docbook-dsssl") |