[bug#65479] [PATCH core-updates 10/61] gnu: docbook2x: Split documentation.

[Maxim Cournoyer <maxim.cournoyer@gmail.com>]

Hi,

Bruno Victal <mirai@makinata.eu> writes:

> * gnu/packages/docbook.scm (docbook2x)[arguments]<#:phases>: Add
> 'split-outputs phase.
> [outputs]: Add 'doc output.
> ---
>  gnu/packages/docbook.scm | 7 +++++++
>  1 file changed, 7 insertions(+)
>
> diff --git a/gnu/packages/docbook.scm b/gnu/packages/docbook.scm
> index 2d1c1f00ad..37eaac0a59 100644
> --- a/gnu/packages/docbook.scm
> +++ b/gnu/packages/docbook.scm
> @@ -902,6 +902,12 @@ (define-public docbook2x
>            (add-after 'unpack 'autoreconf
>              (lambda _
>                (invoke "autoreconf" "-vif")))
> +          (add-after 'install 'split-outputs

That's not a very descriptive phase name.  I'd call it 'move-doc' as
often used elsewhere.

> +            (lambda _
> +              (let* ((old (string-append #$output "/share/doc"))
> +                     (new (string-append #$output:doc "/share/doc")))
> +                (mkdir-p (dirname new))
> +                (rename-file old new))))
>            (add-after 'install 'wrap-programs
>              (lambda* (#:key inputs outputs #:allow-other-keys)
>                (let* ((programs
> @@ -958,6 +964,7 @@ (define-public docbook2x
>             docbook-xml-4.1.2 docbook-xml-4.2 docbook-xml-4.4
>             docbook-xml-4.5
>             groff-minimal libxml2))
> +    (outputs '("out" "doc"))

nitpick: the 'outputs' field conventionally appear before the build-system
one.

-- 
Thanks,
Maxim