03/44: gnu: texinfo: Cross-build fix: Use host perl in host scripts.

[guix-commits]

janneke pushed a commit to branch wip-hurd-vm
in repository guix.

commit b8c57f5d200e6571ec4d514892fcc059e07ae016
Author: Jan (janneke) Nieuwenhuizen <address@hidden>
AuthorDate: Sun Apr 19 12:06:46 2020 +0200

    gnu: texinfo: Cross-build fix: Use host perl in host scripts.
    
    * gnu/packages/texinfo.scm (texinfo)[inputs]: When cross-compiling, add 
perl.
    This makes the host texi2any (makeinfo) refer to the correct perl.
---
 gnu/packages/texinfo.scm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/texinfo.scm b/gnu/packages/texinfo.scm
index 7457d99..70e0503 100644
--- a/gnu/packages/texinfo.scm
+++ b/gnu/packages/texinfo.scm
@@ -7,6 +7,7 @@
 ;;; Copyright © 2019 Pierre-Moana Levesque <address@hidden>
 ;;; Copyright © 2019 Mathieu Othacehe <address@hidden>
 ;;; Copyright © 2020 Nicolas Goaziou <address@hidden>
+;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -68,7 +69,11 @@
                     "env "))
                  #t))))
          '()))
-    (inputs `(("ncurses" ,ncurses)))
+    (inputs `(("ncurses" ,ncurses)
+              ;; TODO: remove `if' in the next rebuild cycle.
+              ,@(if (%current-target-system)
+                    `(("perl" ,perl))
+                    '())))
     ;; When cross-compiling, texinfo will build some of its own binaries with
     ;; the native compiler. This means ncurses is needed both in both inputs
     ;; and native-inputs.