[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: gnu: asciidoc: Use local docbook-xsl package.
|
From: |
Leo Famulari |
|
Subject: |
01/01: gnu: asciidoc: Use local docbook-xsl package. |
|
Date: |
Sun, 21 Aug 2016 21:43:25 +0000 (UTC) |
lfam pushed a commit to branch master
in repository guix.
commit dd10ba6356df83cc7e44fc6cadaa2c8c9749bd69
Author: Tomáš Čech <address@hidden>
Date: Fri Aug 19 21:08:43 2016 +0200
gnu: asciidoc: Use local docbook-xsl package.
* gnu/packages/documentation.scm (asciidoc)[inputs]: Add docbook-xsl.
[arguments]: Add 'make-local-docbook-xsl' phase.
Signed-off-by: Leo Famulari <address@hidden>
---
gnu/packages/documentation.scm | 21 +++++++++++++++++++--
1 file changed, 19 insertions(+), 2 deletions(-)
diff --git a/gnu/packages/documentation.scm b/gnu/packages/documentation.scm
index 72af708..080c0db 100644
--- a/gnu/packages/documentation.scm
+++ b/gnu/packages/documentation.scm
@@ -49,8 +49,25 @@
(base32
"1w71nk527lq504njmaf0vzr93pgahkgzzxzglrq6bay8cw2rvnvq"))))
(build-system gnu-build-system)
- (arguments '(#:tests? #f)) ; no 'check' target
- (inputs `(("python" ,python-2)))
+ (arguments
+ `(#:tests? #f ; no 'check' target
+ #:phases
+ (modify-phases %standard-phases
+ ;; Make asciidoc use the local docbook-xsl package instead of fetching
+ ;; it from the internet at run-time.
+ (add-before 'install 'make-local-docbook-xsl
+ (lambda* (#:key inputs #:allow-other-keys)
+ (substitute* (find-files "docbook-xsl" ".*\\.xsl$")
+ (("xsl:import href=\"http://docbook.sourceforge.net/\
+release/xsl/current")
+ (string-append
+ "xsl:import href=\""
+ (string-append (assoc-ref inputs "docbook-xsl")
+ "/xml/xsl/docbook-xsl-"
+ ,(package-version docbook-xsl)))))
+ #t)))))
+ (inputs `(("python" ,python-2)
+ ("docbook-xsl" ,docbook-xsl)))
(home-page "http://www.methods.co.nz/asciidoc/";)
(synopsis "Text-based document generation system")
(description