From e67245597ecc1b204594f15a50db59972c64a47f Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Thu, 25 Oct 2012 17:54:17 +0200
Subject: [PATCH] distro: ncurses: Don't patch shebangs.

* distro/packages/base.scm (ncurses): Pass #:patch-shebangs? #f.
---
 distro/packages/base.scm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/distro/packages/base.scm b/distro/packages/base.scm
index f17dd44d160..7bd211577ca 100644
--- a/distro/packages/base.scm
+++ b/distro/packages/base.scm
@@ -807,7 +807,6 @@ (define-public gcc-4.7
      (home-page "http://gcc.gnu.org/"))))
 
 (define-public ncurses
-  ;; FIXME: `ncurses-config' retains a ref on bash
   (let ((post-install-phase
          '(lambda* (#:key outputs #:allow-other-keys)
             (let ((out (assoc-ref outputs "out")))
@@ -867,7 +866,11 @@ (define lib.so
            #:tests? #f                            ; no "check" target
            #:phases (alist-cons-after 'install 'post-install
                                       ,post-install-phase
-                                      %standard-phases)))
+                                      %standard-phases)
+
+           ;; The `ncursesw5-config' has a #!/bin/sh that we don't want to
+           ;; patch, to avoid retaining a reference to the build-time Bash.
+           #:patch-shebangs? #f))
         ((system cross-system)
          (arguments cross-system))))
      (self-native-input? #t)
-- 
GitLab