me
/
guix
Archived
1
0
Fork 0

gnu: gdk-pixbuf: Find docbook when cross-compiling.

* gnu/packages/gtk.scm
  (gdk-pixbuf)[arguments]<#:phases>{patch-docbook}: Look for docbook
  in 'native-inputs' instead of 'inputs' when cross-compiling.
master
Maxime Devos 2021-08-25 16:04:59 +02:00 committed by Mathieu Othacehe
parent bce0a7d3d8
commit 26a336c20b
No known key found for this signature in database
GPG Key ID: 8354763531769CA6
1 changed files with 11 additions and 3 deletions

View File

@ -628,15 +628,23 @@ highlighting and other features typical of a source code editor.")
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-after 'unpack 'patch-docbook (add-after 'unpack 'patch-docbook
(lambda* (#:key inputs #:allow-other-keys) ;; TODO(core-updates): Unconditionally look in (or native-inputs inputs)
(lambda* (#:key ,@(if (%current-target-system)
'(native-inputs)
'())
inputs #:allow-other-keys)
(with-directory-excursion "docs" (with-directory-excursion "docs"
(substitute* "meson.build" (substitute* "meson.build"
(("http://docbook.sourceforge.net/release/xsl/current/") (("http://docbook.sourceforge.net/release/xsl/current/")
(string-append (assoc-ref inputs "docbook-xsl") (string-append (assoc-ref ,(if (%current-target-system)
'(or native-inputs inputs)
'inputs) "docbook-xsl")
"/xml/xsl/docbook-xsl-1.79.2/"))) "/xml/xsl/docbook-xsl-1.79.2/")))
(substitute* (find-files "." "\\.xml$") (substitute* (find-files "." "\\.xml$")
(("http://www.oasis-open.org/docbook/xml/4\\.3/") (("http://www.oasis-open.org/docbook/xml/4\\.3/")
(string-append (assoc-ref inputs "docbook-xml") (string-append (assoc-ref ,(if (%current-target-system)
'(or native-inputs inputs)
'inputs) "docbook-xml")
"/xml/dtd/docbook/")))) "/xml/dtd/docbook/"))))
#t)) #t))
(add-before 'configure 'disable-failing-tests (add-before 'configure 'disable-failing-tests