From 16a23d4ad27d3149a307e5fd1f3bebe81ee4dc3f Mon Sep 17 00:00:00 2001
From: Marius Bakke <mbakke@fastmail.com>
Date: Fri, 7 Oct 2016 01:36:50 +0100
Subject: [PATCH] gnu: xapian: Use 'modify-phases' syntax.

* gnu/packages/search.scm (xapian)[arguments]: Use 'modify-phases'. Fix
'/bin/sh' substitution to use (which "sh") instead of (which "bash").
---
 gnu/packages/search.scm | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/gnu/packages/search.scm b/gnu/packages/search.scm
index 9eb4039f84..367d7e6c6f 100644
--- a/gnu/packages/search.scm
+++ b/gnu/packages/search.scm
@@ -46,12 +46,12 @@
     (inputs `(("zlib" ,zlib)
               ("util-linux" ,util-linux)))
     (arguments
-     `(#:phases (alist-cons-after
-                 'unpack 'patch-remotetcp-harness
-                 (lambda _
-                   (substitute* "tests/harness/backendmanager_remotetcp.cc"
-                     (("/bin/sh") (which "bash"))))
-                 %standard-phases)))
+     `(#:phases
+       (modify-phases %standard-phases
+         (add-after 'unpack 'patch-remotetcp-harness
+           (lambda _
+             (substitute* "tests/harness/backendmanager_remotetcp.cc"
+               (("/bin/sh") (which "sh"))))))))
     (synopsis "Search Engine Library")
     (description
      "Xapian is a highly adaptable toolkit which allows developers to easily