diff options
author | 宋文武 <iyzsong@member.fsf.org> | 2018-06-10 23:42:14 +0800 |
---|---|---|
committer | 宋文武 <iyzsong@member.fsf.org> | 2018-06-10 23:42:14 +0800 |
commit | 670a5e543033022a66d930d62a7dbff510f095db (patch) | |
tree | 570111a7a9d7c787f85156560f3b29e3243b3991 /gnu/packages | |
parent | af09dabf70659a891bc1cb392aeff1ff5b8aeded (diff) | |
download | guix-670a5e543033022a66d930d62a7dbff510f095db.tar guix-670a5e543033022a66d930d62a7dbff510f095db.tar.gz |
gnu: keepalived: Install info documentation.
* gnu/packages/cluster.scm (keepalived)[arguments]: Add phases 'build-info'
and 'install-info'.
[native-inputs]: Add texinfo.
Diffstat (limited to 'gnu/packages')
-rw-r--r-- | gnu/packages/cluster.scm | 24 |
1 files changed, 22 insertions, 2 deletions
diff --git a/gnu/packages/cluster.scm b/gnu/packages/cluster.scm index 429b0885a0..7cfd04f008 100644 --- a/gnu/packages/cluster.scm +++ b/gnu/packages/cluster.scm @@ -24,6 +24,7 @@ #:use-module (gnu packages linux) #:use-module (gnu packages pkg-config) #:use-module (gnu packages python) + #:use-module (gnu packages texinfo) #:use-module (gnu packages tls)) (define-public keepalived @@ -48,10 +49,29 @@ ;; output of 'pkg-config'. (substitute* "configure" (("PKG_CONFIG --libs") "PKG_CONFIG --libs-only-l")) - #t))))) + #t)) + (add-after 'build 'build-info + (lambda _ + (invoke "make" "-C" "doc" "texinfo") + ;; Put images in a subdirectory as recommended by 'texinfo'. + (install-file "doc/build/texinfo/software_design.png" + "doc/build/texinfo/keepalived-figures") + (substitute* "doc/build/texinfo/keepalived.texi" + (("@image\\{software_design,") + "@image{keepalived-figures/software_design,")) + (invoke "make" "-C" "doc/build/texinfo"))) + (add-after 'install 'install-info + (lambda* (#:key outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (infodir (string-append out "/share/info"))) + (install-file "doc/build/texinfo/keepalived.info" infodir) + (install-file "doc/build/texinfo/software_design.png" + (string-append infodir "/keepalived-figures")) + #t)))))) (native-inputs `(("pkg-config" ,pkg-config) - ("python-sphinx" ,python-sphinx))) + ("python-sphinx" ,python-sphinx) + ("texinfo" ,texinfo))) (inputs `(("openssl" ,openssl) ("libnfnetlink" ,libnfnetlink) |