From 49f5a21698f4e47b381c9c1f2ecc13d19d1faaf3 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Thu, 20 Dec 2012 01:35:58 +0100 Subject: distro: ncurses: Patch references to /bin/sh. * distro/packages/ncurses.scm (ncurses): Add `patch-makefile-phase' and `pre-install-phase'. --- distro/packages/ncurses.scm | 21 +++++++++++++++++---- 1 file changed, 17 insertions(+), 4 deletions(-) (limited to 'distro/packages') diff --git a/distro/packages/ncurses.scm b/distro/packages/ncurses.scm index 9764474c93..868222ef83 100644 --- a/distro/packages/ncurses.scm +++ b/distro/packages/ncurses.scm @@ -24,7 +24,14 @@ #:use-module (guix build-system gnu)) (define-public ncurses - (let ((post-install-phase + (let ((patch-makefile-phase + '(lambda _ + (substitute* (find-files "." "Makefile.in") + (("^SHELL[[:blank:]]*=.*$") "")))) + (pre-install-phase + '(lambda _ + (for-each patch-shebang (find-files "." "\\.sh$")))) + (post-install-phase '(lambda* (#:key outputs #:allow-other-keys) (let ((out (assoc-ref outputs "out"))) ;; When building a wide-character (Unicode) build, create backward @@ -81,9 +88,15 @@ '("--without-cxx-binding") '())) #:tests? #f ; no "check" target - #:phases (alist-cons-after 'install 'post-install - ,post-install-phase - %standard-phases) + #:phases (alist-cons-after + 'install 'post-install ,post-install-phase + (alist-cons-before + 'configure 'patch-makefile-SHELL + ,patch-makefile-phase + (alist-cons-before + 'install 'pre-install-phase + ,pre-install-phase + %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. -- cgit v1.2.3