gnu: at-spi2-core: Unconditionally lookup docbook in native-inputs.
* gnu/packages/gtk.scm (at-spi2-core)[arguments]<#:phases>{patch-docbook-sgml}: Unconditionally look in (or native-inputs inputs) for docbook-xml. Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
This commit is contained in:
parent
2d9c06c61d
commit
c3417f0754
1 changed files with 2 additions and 7 deletions
|
@ -740,15 +740,10 @@ scaled, composited, modified, saved, or rendered.")
|
|||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(mkdir-p (string-append (assoc-ref outputs "doc") "/share"))
|
||||
#t))
|
||||
;; TODO(core-updates): Unconditionally use (or native-inputs inputs)
|
||||
(add-after 'unpack 'patch-docbook-sgml
|
||||
(lambda* (#:key ,@(if (%current-target-system)
|
||||
'(native-inputs)
|
||||
'()) inputs #:allow-other-keys)
|
||||
(lambda* (#:key native-inputs inputs #:allow-other-keys)
|
||||
(let* ((xmldoc
|
||||
(string-append (assoc-ref ,(if (%current-target-system)
|
||||
'(or native-inputs inputs)
|
||||
'inputs)
|
||||
(string-append (assoc-ref (or native-inputs inputs)
|
||||
"docbook-xml")
|
||||
"/xml/dtd/docbook")))
|
||||
(substitute* "doc/libatspi/libatspi-docs.sgml"
|
||||
|
|
Reference in a new issue