01/04: gnu: boost: Simplify phases.

[Mark H. Weaver]

mhw pushed a commit to branch core-updates
in repository guix.

commit 196fb12cb8311ced90e51d9246deeea432ecce58
Author: Mark H Weaver <address@hidden>
Date:   Sat Mar 17 23:08:07 2018 -0400

    gnu: boost: Simplify phases.
    
    * gnu/packages/boost.scm (boost)[arguments]: Remove unneeded '#t's from
    'configure', 'build', and 'install' phases.
---
 gnu/packages/boost.scm | 13 +++++--------
 1 file changed, 5 insertions(+), 8 deletions(-)

diff --git a/gnu/packages/boost.scm b/gnu/packages/boost.scm
index ebfe2a8..f7e90b4 100644
--- a/gnu/packages/boost.scm
+++ b/gnu/packages/boost.scm
@@ -92,18 +92,15 @@
 
                (invoke "./bootstrap.sh"
                        (string-append "--prefix=" out)
-                       "--with-toolset=gcc")
-               #t)))
+                       "--with-toolset=gcc"))))
          (replace 'build
-           (lambda* (#:key outputs make-flags #:allow-other-keys)
+           (lambda* (#:key make-flags #:allow-other-keys)
              (apply invoke "./b2"
                     (format #f "-j~a" (parallel-job-count))
-                    make-flags)
-             #t))
+                    make-flags)))
          (replace 'install
-           (lambda* (#:key outputs make-flags #:allow-other-keys)
-             (apply invoke "./b2" "install" make-flags)
-             #t)))))
+           (lambda* (#:key make-flags #:allow-other-keys)
+             (apply invoke "./b2" "install" make-flags))))))
 
     (home-page "http://www.boost.org";)
     (synopsis "Peer-reviewed portable C++ source libraries")