summary refs log tree commit diff
path: root/gnu/packages/piet.scm
diff options
context:
space:
mode:
authorZheng Junjie <zhengjunjie@iscas.ac.cn>2023-09-06 17:46:48 +0800
committerLudovic Courtès <ludo@gnu.org>2023-09-14 17:03:18 +0200
commit40a76a7750586c05b85619a8a6e69610005edbc8 (patch)
treebd7cb5ab66c8124cdf6e34968d9f04311c7671b8 /gnu/packages/piet.scm
parent9aeb9e7cc83d5d0e1aed7b34fb5a357645fd86a9 (diff)
downloadguix-40a76a7750586c05b85619a8a6e69610005edbc8.tar.gz
gnu: npiet: Fix cross-compilation.
* gnu/packages/piet.scm (npiet)[arguments]<#:phases>: Use
SEARCH-INPUT-FILE replace WHICH.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Diffstat (limited to 'gnu/packages/piet.scm')
-rw-r--r--gnu/packages/piet.scm7
1 files changed, 5 insertions, 2 deletions
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))