~ruther/guix-local: gnu: polkit-duktape: Fix cross-compiling.

67e5b56960dc2d53774509751215e35e86d2b28f — Efraim Flashner 3 years ago e7532d2

gnu: polkit-duktape: Fix cross-compiling.

* gnu/packages/polkit.scm (polkit-duktape)[arguments]: When
cross-compiling also search native-inputs for inputs.

patch browse .tar.gz .zip

1 files changed, 19 insertions(+), 8 deletions(-)

M gnu/packages/polkit.scm

M gnu/packages/polkit.scm => gnu/packages/polkit.scm +19 -8

@@ 118,14 118,25 @@
                  (string-append out "/share/gir-1.0/"))
                 (("@INTROSPECTION_TYPELIBDIR@")
                  (string-append out "/lib/girepository-1.0/"))))))
-         (add-after 'unpack 'fix-manpage-generation
-           (lambda* (#:key inputs #:allow-other-keys)
-             (let ((xsldoc (string-append (assoc-ref inputs "docbook-xsl")
-                                          "/xml/xsl/docbook-xsl-"
-                                          ,(package-version docbook-xsl))))
-               (substitute* '("docs/man/Makefile.am" "docs/man/Makefile.in")
-                 (("http://docbook.sourceforge.net/release/xsl/current")
-                  xsldoc)))))
+         ;; TODO: Core-updates: Unify on the cross-build version.
+         ,@(if (%current-target-system)
+             `((add-after 'unpack 'fix-manpage-generation
+               (lambda* (#:key inputs native-inputs #:allow-other-keys)
+                 (let ((xsldoc (string-append (assoc-ref (or native-inputs inputs)
+                                                         "docbook-xsl")
+                                              "/xml/xsl/docbook-xsl-"
+                                              ,(package-version docbook-xsl))))
+                   (substitute* '("docs/man/Makefile.am" "docs/man/Makefile.in")
+                     (("http://docbook.sourceforge.net/release/xsl/current")
+                      xsldoc))))))
+             `((add-after 'unpack 'fix-manpage-generation
+               (lambda* (#:key inputs #:allow-other-keys)
+                 (let ((xsldoc (string-append (assoc-ref inputs "docbook-xsl")
+                                              "/xml/xsl/docbook-xsl-"
+                                              ,(package-version docbook-xsl))))
+                   (substitute* '("docs/man/Makefile.am" "docs/man/Makefile.in")
+                     (("http://docbook.sourceforge.net/release/xsl/current")
+                      xsldoc)))))))
          (replace
           'install
           (lambda* (#:key outputs (make-flags '()) #:allow-other-keys)