gnu: docbook-xsl: Move 'use-modules' form to the top level.

* gnu/packages/docbook.scm (docbook-xsl)[arguments]: Move 'use-modules'
to the top level.
This commit is contained in:
Ludovic Courtès 2021-03-08 13:59:23 +01:00
parent 324a235579
commit 1757abb01f
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU ;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2014 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2014, 2021 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2014 Eric Bavier <bavier@member.fsf.org> ;;; Copyright © 2014 Eric Bavier <bavier@member.fsf.org>
;;; Copyright © 2016 Mathieu Lirzin <mthl@gnu.org> ;;; Copyright © 2016 Mathieu Lirzin <mthl@gnu.org>
;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr>
@ -189,9 +189,12 @@ (define-public docbook-xsl
#t)))) #t))))
(build-system trivial-build-system) (build-system trivial-build-system)
(arguments (arguments
`(#:builder (let ((name-version (string-append ,name "-" ,version))) `(#:builder (begin
(use-modules (guix build utils)) (use-modules (guix build utils))
(define name-version
(string-append ,name "-" ,version))
(let* ((bzip2 (assoc-ref %build-inputs "bzip2")) (let* ((bzip2 (assoc-ref %build-inputs "bzip2"))
(xz (assoc-ref %build-inputs "xz")) (xz (assoc-ref %build-inputs "xz"))
(tar (assoc-ref %build-inputs "tar")) (tar (assoc-ref %build-inputs "tar"))