From 40a76a7750586c05b85619a8a6e69610005edbc8 Mon Sep 17 00:00:00 2001 From: Zheng Junjie 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 --- gnu/packages/piet.scm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'gnu/packages') 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 ;;; Copyright © 2020 Tobias Geerinckx-Rice +;;; 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