apteryx pushed a commit to branch master
in repository guix.

commit 0dacf51553405da41a9df1d7a0ebbf1f401267ae
Author: Maxim Cournoyer <maxim.courno...@gmail.com>
AuthorDate: Sun Jun 23 21:48:13 2024 -0400

    gnu: gauche: Remove trailing #t.
    
    * gnu/packages/scheme.scm (gauche) [phases]: Remove trailing #t.
    
    Change-Id: I47b4f2a7475a41e6431bba0c3d6bd21b9f584fc5
---
 gnu/packages/scheme.scm | 12 ++++--------
 1 file changed, 4 insertions(+), 8 deletions(-)

diff --git a/gnu/packages/scheme.scm b/gnu/packages/scheme.scm
index 8bf72deb23..927e10bbfe 100644
--- a/gnu/packages/scheme.scm
+++ b/gnu/packages/scheme.scm
@@ -1116,24 +1116,20 @@ The core is 12 builtin special forms and 33 builtin 
functions.")
                             "ext/tls/test.scm"
                             "lib/gauche/package/util.scm"
                             "libsrc/gauche/process.scm")
-               (("/bin/sh") (which "sh")))
-             #t))
+               (("/bin/sh") (which "sh")))))
          (add-after 'build 'build-doc
            (lambda _
              (with-directory-excursion "doc"
-               (invoke "make" "info"))
-             #t))
+               (invoke "make" "info"))))
          (add-before 'check 'patch-network-tests
            ;; Remove net checks.
            (lambda _
              (delete-file "test/net.scm")
-             (invoke "touch" "test/net.scm")
-             #t))
+             (invoke "touch" "test/net.scm")))
          (add-after 'install 'install-docs
            (lambda _
              (with-directory-excursion "doc"
-               (invoke "make" "install"))
-             #t)))))
+               (invoke "make" "install")))))))
     (synopsis "Scheme scripting engine")
     (description "Gauche is a R7RS Scheme scripting engine aiming at being a
 handy tool that helps programmers and system administrators to write small to

Reply via email to