gnu: telegram-desktop: Delete trailing #t.

* gnu/packages/telegram.scm (telegram-desktop)[source]: Delete
trailing #t.
[arguments]<#:phases>: Likewise.

Signed-off-by: Liliana Marie Prikler <liliana.prikler@gmail.com>
This commit is contained in:
Hilton Chain 2022-09-20 23:34:51 +08:00 committed by Liliana Marie Prikler
parent 5ca7ec92f5
commit 425e4f6fcd
No known key found for this signature in database
GPG key ID: 442A84B8C70E2F87

View file

@ -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