From 40a76a7750586c05b85619a8a6e69610005edbc8 Mon Sep 17 00:00:00 2001
From: Zheng Junjie <zhengjunjie@iscas.ac.cn>
Date: Wed, 6 Sep 2023 17:46:48 +0800
Subject: gnu: npiet: Fix cross-compilation.
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

* gnu/packages/piet.scm (npiet)[arguments]<#:phases>: Use
SEARCH-INPUT-FILE replace WHICH.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
---
 gnu/packages/piet.scm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

(limited to 'gnu')

diff --git a/gnu/packages/piet.scm b/gnu/packages/piet.scm
index 824efe59de..8e5a313e82 100644
--- a/gnu/packages/piet.scm
+++ b/gnu/packages/piet.scm
@@ -1,6 +1,7 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2020 Jesse Gibbons <jgibbons2357+guix@gmail.com>
 ;;; Copyright © 2020 Tobias Geerinckx-Rice <me@tobias.gr>
+;;; Copyright © 2023 Zheng Junjie <873216071@qq.com>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -46,10 +47,12 @@
      `(#:phases
        (modify-phases %standard-phases
          (add-after 'install 'wrap-binaries
-           (lambda* (#:key outputs #:allow-other-keys)
+           (lambda* (#:key inputs outputs #:allow-other-keys)
              (let ((out (assoc-ref outputs "out")))
                (wrap-program (string-append out "/bin/npietedit")
-                 `("PATH" ":" prefix (,(dirname (which "wish")))))
+                 `("PATH" ":" prefix
+                   (,(dirname
+                      (search-input-file inputs "bin/wish")))))
                #t))))))
     (inputs
      (list gd giflib libpng tk))
-- 
cgit v1.2.3

283d589d7d9'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/tests/keys/ed25519-2.pub'>
<input type='hidden' name='id' value='d0e3fd2dc42c3bcba96fd8e4256b1283d589d7d9'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=d0e3fd2dc42c3bcba96fd8e4256b1283d589d7d9'>root</a>/<a href='/guix/log/tests?id=d0e3fd2dc42c3bcba96fd8e4256b1283d589d7d9'>tests</a>/<a href='/guix/log/tests/keys?id=d0e3fd2dc42c3bcba96fd8e4256b1283d589d7d9'>keys</a>/<a href='/guix/log/tests/keys/ed25519-2.pub?id=d0e3fd2dc42c3bcba96fd8e4256b1283d589d7d9'>ed25519-2.pub</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/tests/keys/ed25519-2.pub?id=d0e3fd2dc42c3bcba96fd8e4256b1283d589d7d9&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>