diff options
author | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2020-09-18 09:35:13 -0400 |
---|---|---|
committer | Maxim Cournoyer <maxim.cournoyer@gmail.com> | 2020-09-19 23:22:46 -0400 |
commit | 4d82e8e5c5f7e43dbaf5d009697915717d15b155 (patch) | |
tree | 2d027f881b9a802f4b7d03932c9198ae03198cb6 | |
parent | 38197bb50973c9e49e8ae04bb240cdbf3f057bfd (diff) | |
download | guix-4d82e8e5c5f7e43dbaf5d009697915717d15b155.tar.gz guix-4d82e8e5c5f7e43dbaf5d009697915717d15b155.zip |
gnu: qemu: Move HTML documentation to the doc output.
* gnu/packages/virtualization.scm (qemu)[outputs]: Add "doc" output.
[phases]{create-samba-wrapper}: Correctly refer to the outputs keyword
argument.
{move-html-doc}: Add phase.
-rw-r--r-- | gnu/packages/virtualization.scm | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/gnu/packages/virtualization.scm b/gnu/packages/virtualization.scm index ebfec6cb25..53e9dde125 100644 --- a/gnu/packages/virtualization.scm +++ b/gnu/packages/virtualization.scm @@ -139,6 +139,7 @@ (base32 "1rd41wwlvp0vpialjp2czs6i3lsc338xc72l3zkbb7ixjfslw5y9")) (patches (search-patches "qemu-build-info-manual.patch")))) + (outputs '("out" "doc")) ;4.7 MiB of HTML docs (build-system gnu-build-system) (arguments `(;; FIXME: Disable tests on i686 to work around @@ -239,7 +240,7 @@ ;; Samba in your Guix profile for Samba support. (add-after 'install 'create-samba-wrapper (lambda* (#:key inputs outputs #:allow-other-keys) - (let* ((out (assoc-ref %outputs "out")) + (let* ((out (assoc-ref outputs "out")) (libexec (string-append out "/libexec"))) (call-with-output-file "samba-wrapper" (lambda (port) @@ -247,6 +248,15 @@ exec smbd $@"))) (chmod "samba-wrapper" #o755) (install-file "samba-wrapper" libexec)) + #t)) + (add-after 'install 'move-html-doc + (lambda* (#:key inputs outputs #:allow-other-keys) + (let* ((out (assoc-ref outputs "out")) + (doc (assoc-ref outputs "doc")) + (qemu-doc (string-append doc "/share/doc/qemu-" ,version))) + (mkdir-p qemu-doc) + (rename-file (string-append out "/share/doc/qemu") + (string-append qemu-doc "/html"))) #t))))) (inputs ; TODO: Add optional inputs. `(("alsa-lib" ,alsa-lib) |