20/22: glib: Look up "tzdata" in 'native-inputs', not 'inputs'.

[guix-commits]

mothacehe pushed a commit to branch core-updates
in repository guix.

commit 5a88b8df00dfcfb3d145ca0fd30d9fd27af4af7d
Author: Maxime Devos <maximedevos@telenet.be>
AuthorDate: Wed Jul 14 13:13:05 2021 +0200

    glib: Look up "tzdata" in 'native-inputs', not 'inputs'.
    
    Otherwise, "tzdata" won't be found when cross-compiling
    and string-append will complain about types. Alternatively,
    "tzdata" could be moved from 'native-inputs' to 'inputs'.
    
    * gnu/packages/glib.scm (glib)[arguments]<#:phases>{pre-check}:
      Look up "tzdata" in 'native-inputs', not 'inputs'.
    
    Signed-off-by: Mathieu Othacehe <othacehe@gnu.org>
---
 gnu/packages/glib.scm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/glib.scm b/gnu/packages/glib.scm
index e4ebed7..01683df 100644
--- a/gnu/packages/glib.scm
+++ b/gnu/packages/glib.scm
@@ -252,10 +252,11 @@ shared NFS home directories.")
                                  (package-version python)))))
              #t))
          (add-before 'check 'pre-check
-           (lambda* (#:key inputs outputs #:allow-other-keys)
+           (lambda* (#:key native-inputs inputs outputs #:allow-other-keys)
              ;; For tests/gdatetime.c.
              (setenv "TZDIR"
-                     (string-append (assoc-ref inputs "tzdata")
+                     (string-append (assoc-ref (or native-inputs inputs)
+                                               "tzdata")
                                     "/share/zoneinfo"))
              ;; Some tests want write access there.
              (setenv "HOME" (getcwd))