From 8924e3fd9a4e77c65bf2a80408f36d7e7355cda8 Mon Sep 17 00:00:00 2001
From: Ricardo Wurmus <rekado@elephly.net>
Date: Sat, 26 Jan 2019 22:38:36 +0100
Subject: [PATCH] gnu: guile-for-guile-emacs: Remove redundant build phases.

* gnu/packages/guile.scm (guile-for-guile-emacs)[arguments]: Remove build
phases "autogen" and "patch-/bin/sh".
---
 gnu/packages/guile.scm | 18 ++++--------------
 1 file changed, 4 insertions(+), 14 deletions(-)

diff --git a/gnu/packages/guile.scm b/gnu/packages/guile.scm
index b9580b0d7a..1b1285d32c 100644
--- a/gnu/packages/guile.scm
+++ b/gnu/packages/guile.scm
@@ -435,20 +435,10 @@ GNU@tie{}Guile.  Use the @code{(ice-9 readline)} module and call its
                (base32
                 "00sprsshy16y8pxjy126hr2adqcvvzzz96hjyjwgg8swva1qh6b0"))))
     (arguments
-     (substitute-keyword-arguments `(;; Tests aren't passing for now.
-                                     ;; Obviously we should re-enable this!
-                                     #:tests? #f
-                                     ,@(package-arguments guile-2.2))
-       ((#:phases phases)
-        `(modify-phases ,phases
-           (add-after 'unpack 'autogen
-                      (lambda _
-                        (zero? (system* "sh" "autogen.sh"))))
-           (add-before 'autogen 'patch-/bin/sh
-                       (lambda _
-                         (substitute* "build-aux/git-version-gen"
-                           (("#!/bin/sh") (string-append "#!" (which "sh"))))
-                         #t))))))
+     `(;; Tests aren't passing for now.
+       ;; Obviously we should re-enable this!
+       #:tests? #f
+       ,@(package-arguments guile-2.2)))
     (native-inputs
      `(("autoconf" ,autoconf)
        ("automake" ,automake)