05/12: gnu: mosh: Prepare for cross-building.

[guix-commits]

nckx pushed a commit to branch master
in repository guix.

commit f59bbf0a97b1d35a37c003f547ead11729d76c4c
Author: Tobias Geerinckx-Rice <me@tobias.gr>
AuthorDate: Sun Oct 15 02:00:00 2023 +0200

    gnu: mosh: Prepare for cross-building.
    
    Currently blocked by protobuf.
    
    * gnu/packages/ssh.scm (mosh)[arguments]: Use SEARCH-INPUT-FILE.
---
 gnu/packages/ssh.scm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/ssh.scm b/gnu/packages/ssh.scm
index 39b90fad8f..2434a563c2 100644
--- a/gnu/packages/ssh.scm
+++ b/gnu/packages/ssh.scm
@@ -477,10 +477,10 @@ with optional @acronym{TLS, Transport-Level Security} to 
protect credentials.")
       #:phases
       #~(modify-phases %standard-phases
           (add-after 'unpack 'patch-FHS-file-names
-            (lambda _
+            (lambda* (#:key inputs #:allow-other-keys)
               (substitute* "scripts/mosh.pl"
-                (("/bin/sh")
-                 (which "sh")))))
+                (("/bin/sh" shell)
+                 (search-input-file inputs shell)))))
           (add-after 'install 'wrap
             (lambda _
               ;; Make sure 'mosh' can find 'mosh-client' and 'mosh-server'.