guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

04/14: gnu: tootle: Remove trailing #t in phases.


From: guix-commits
Subject: 04/14: gnu: tootle: Remove trailing #t in phases.
Date: Wed, 5 Jan 2022 17:46:34 -0500 (EST)

civodul pushed a commit to branch master
in repository guix.

commit 282197b52158764889bcc56955dc98940947d493
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Wed Jan 5 23:10:36 2022 +0100

    gnu: tootle: Remove trailing #t in phases.
    
    * gnu/packages/mastodon.scm (tootle)[arguments]: Remove trailing #t.
---
 gnu/packages/mastodon.scm | 10 ++++------
 1 file changed, 4 insertions(+), 6 deletions(-)

diff --git a/gnu/packages/mastodon.scm b/gnu/packages/mastodon.scm
index a50ed7fdf9..d6fd1db2b6 100644
--- a/gnu/packages/mastodon.scm
+++ b/gnu/packages/mastodon.scm
@@ -105,8 +105,7 @@ Features include:
            ;; Don't create 'icon-theme.cache'.
            (lambda _
              (substitute* "meson/post_install.py"
-               (("gtk-update-icon-cache") "true"))
-             #t))
+               (("gtk-update-icon-cache") "true"))))
          (add-after 'unpack 'patch-source
            (lambda _
              (substitute* "src/Dialogs/NewAccount.vala"
@@ -115,13 +114,12 @@ Features include:
              (substitute* "src/Build.vala"
                (("(os_name = ).*" _ first) (string-append first "\"GNU\";\n"))
                (("(os_ver = ).*" _ first) (string-append first "\"Guix\";\n"))
-               (("GLib.Environment.get_os_info.*") "\"unknown\";\n"))
-             #t))
+               (("GLib.Environment.get_os_info.*") "\"unknown\";\n"))))
          (add-after 'install 'symlink-package
            (lambda* (#:key outputs #:allow-other-keys)
              (symlink "com.github.bleakgrey.tootle"
-                      (string-append (assoc-ref outputs "out") "/bin/tootle"))
-             #t)))))
+                      (string-append (assoc-ref outputs "out")
+                                     "/bin/tootle")))))))
     (native-inputs
      (list gettext-minimal
            `(,glib "bin") ; for glib-compile-resources



reply via email to

[Prev in Thread] Current Thread [Next in Thread]