gnu: telegram-cli: Update compiler flags.

* gnu/packages/telegram.scm (telegram-cli)[arguments]: Add phase to remove
-Werror and add -fcommon; remove trailing #T.

Change-Id: I1c82fdd914b5f27f00e4bf87e4adc3eb559a874c
This commit is contained in:
Ricardo Wurmus 2024-03-08 23:57:15 +01:00
parent bd30691681
commit c7c99aeb3c
No known key found for this signature in database
GPG key ID: 197A5888235FACAC

View file

@ -687,25 +687,29 @@ (define-public telegram-cli
(base32 "0c1w7jgska71jjbvg1y09v52549pwa4zkdjly18yxywn7gayd2p6")))) (base32 "0c1w7jgska71jjbvg1y09v52549pwa4zkdjly18yxywn7gayd2p6"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:tests? #f ; No target (list
#:imported-modules #:tests? #f ; No target
((guix build copy-build-system) #:imported-modules
`((guix build copy-build-system)
,@%gnu-build-system-modules) ,@%gnu-build-system-modules)
#:modules #:modules
(((guix build copy-build-system) '(((guix build copy-build-system)
#:prefix copy:) #:prefix copy:)
(guix build gnu-build-system) (guix build gnu-build-system)
(guix build utils)) (guix build utils))
#:configure-flags #:configure-flags
(list '(list
;; Use gcrypt instead of openssl. ;; Use gcrypt instead of openssl.
"--disable-openssl") "--disable-openssl")
#:phases #:phases
(modify-phases %standard-phases '(modify-phases %standard-phases
(add-after 'unpack 'remove-Werror
(lambda _
(substitute* "Makefile.in"
(("-Werror") "-fcommon"))))
(add-after 'unpack 'trigger-bootstrap (add-after 'unpack 'trigger-bootstrap
(lambda _ (lambda _
(delete-file "configure") (delete-file "configure")))
#t))
(add-after 'trigger-bootstrap 'patch-tgl-and-tlparser (add-after 'trigger-bootstrap 'patch-tgl-and-tlparser
(lambda* (#:key inputs #:allow-other-keys) (lambda* (#:key inputs #:allow-other-keys)
(for-each delete-file (for-each delete-file
@ -725,8 +729,7 @@ (define-public telegram-cli
"/include/tgl/auto")) "/include/tgl/auto"))
(("LIB=libs") (("LIB=libs")
(string-append "LIB=" (assoc-ref inputs "tgl") (string-append "LIB=" (assoc-ref inputs "tgl")
"/lib/tgl"))) "/lib/tgl")))))
#t))
(replace 'install (replace 'install
(lambda args (lambda args
(apply (assoc-ref copy:%standard-phases 'install) (apply (assoc-ref copy:%standard-phases 'install)