05/07: gnu: bogofilter: Use 'modify-phases'.

[Efraim Flashner]

efraim pushed a commit to branch master
in repository guix.

commit c55fa42b2d1b9c135eca1e73aa8c50cec211dba8
Author: Efraim Flashner <address@hidden>
Date:   Tue Dec 20 22:07:35 2016 +0200

    gnu: bogofilter: Use 'modify-phases'.
    
    * gnu/packages/mail.scm (bogofilter)[arguments]: Use 'modify-phases'.
---
 gnu/packages/mail.scm |   15 ++++++++-------
 1 file changed, 8 insertions(+), 7 deletions(-)

diff --git a/gnu/packages/mail.scm b/gnu/packages/mail.scm
index 0ebc91e..3739f8b 100644
--- a/gnu/packages/mail.scm
+++ b/gnu/packages/mail.scm
@@ -305,13 +305,14 @@ Extension (MIME).")
                 "1d56n2m9inm8gnzm88aa27xl2a7sp7aff3484vmflpqkinjqf0p1"))))
     (build-system gnu-build-system)
     (arguments
-     '(#:phases (alist-cons-before
-                 'check 'pre-check
-                 (lambda _
-                   (substitute* "src/tests/t.frame"
-                     (("GREP=/bin/grep")
-                      (string-append "GREP=" (which "grep") "\n"))))
-                 %standard-phases)))
+     '(#:phases
+       (modify-phases %standard-phases
+         (add-before 'check 'pre-check
+           (lambda _
+             (substitute* "src/tests/t.frame"
+               (("GREP=/bin/grep")
+                (string-append "GREP=" (which "grep") "\n")))
+             #t)))))
     (native-inputs `(("flex" ,flex)))
     (inputs `(("bdb" ,bdb)))
     (home-page "http://bogofilter.sourceforge.net/";)