[bug#57675] [PATCH v6 02/11] gnu: telegram-desktop: Delete trailing #t.

[Hilton Chain]

* gnu/packages/telegram.scm (telegram-desktop)[source,#:phases]: Delete
trailing #t.
---
 gnu/packages/telegram.scm | 14 ++++----------
 1 file changed, 4 insertions(+), 10 deletions(-)

diff --git a/gnu/packages/telegram.scm b/gnu/packages/telegram.scm
index ae1b727df7..08a72d2e0f 100644
--- a/gnu/packages/telegram.scm
+++ b/gnu/packages/telegram.scm
@@ -292,8 +292,7 @@ (define-public telegram-desktop
                (for-each delete-file-recursively
                          (lset-difference string=?
                                           (scandir ".")
-                                          (cons* "." ".." keep))))
-             #t)))))
+                                          (cons* "." ".." keep)))))))))
     (build-system qt-build-system)
     (arguments
      `(#:tests? #f                      ; No target
@@ -322,8 +321,7 @@ (define-public telegram-desktop
        (modify-phases %standard-phases
          (add-after 'unpack 'make-writable
            (lambda _
-             (for-each make-file-writable (find-files "."))
-             #t))
+             (for-each make-file-writable (find-files "."))))
          (add-after 'make-writable 'copy-inputs
            (lambda* (#:key inputs outputs #:allow-other-keys)
              (for-each
@@ -350,14 +348,10 @@ (define-public telegram-desktop
                 ("Telegram/lib_waylandshells" ,(assoc-ref inputs 
"lib-waylandshells-source"))
                 ("Telegram/lib_webrtc" ,(assoc-ref inputs "lib-webrtc-source"))
                 ("Telegram/lib_webview" ,(assoc-ref inputs 
"lib-webview-source"))
-                ("Telegram/ThirdParty/tgcalls"
-                 ,(assoc-ref inputs "tgcalls-source"))))
-             #t))
+                ("Telegram/ThirdParty/tgcalls" ,(assoc-ref inputs 
"tgcalls-source"))))))
          (add-before 'configure 'patch-cxx-flags
            (lambda _
-             (substitute* "cmake/options_linux.cmake"
-               (("class-memaccess") "all"))
-             #t))
+             (substitute* "cmake/options_linux.cmake" (("class-memaccess") 
"all"))))
          (add-after 'install 'glib-or-gtk-compile-schemas
            (assoc-ref glib-or-gtk:%standard-phases 
'glib-or-gtk-compile-schemas))
          (add-after 'glib-or-gtk-compile-schemas 'glib-or-gtk-wrap
--
2.37.3