From 5c86492acbc97881a04fb1d8a6be818fb980a1cd Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Mon, 19 Sep 2022 02:23:45 +0530
Subject: guix.scm: Patch shebang in executable script.

* guix.scm (tissue)[arguments]: Add patch-source-shebangs script.
---
 guix.scm | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/guix.scm b/guix.scm
index 9eedc33..9ae544b 100644
--- a/guix.scm
+++ b/guix.scm
@@ -40,6 +40,11 @@
            #:phases
            (with-imported-modules '((guix build guile-build-system))
              #~(modify-phases %standard-phases
+                 (replace 'patch-source-shebangs
+                   (lambda* (#:key inputs #:allow-other-keys)
+                     (substitute* "bin/tissue"
+                       (("^exec guile")
+                        (string-append "exec " (search-input-file inputs "/bin/guile"))))))
                  (delete 'configure)
                  (add-after 'install 'wrap
                    (lambda* (#:key inputs outputs #:allow-other-keys)
-- 
cgit v1.2.3