gnu: tgl: Remove -Werror.

* gnu/packages/telegram.scm (tgl)[arguments]: Add phase to remove "-Werror".

Change-Id: I0e93b41ed6bae4b74fc12bdeddd3019a8b0e6bd5
This commit is contained in:
Ricardo Wurmus 2024-03-08 23:55:09 +01:00
parent 09346fd05f
commit bd30691681
No known key found for this signature in database
GPG key ID: 197A5888235FACAC

View file

@ -4,6 +4,7 @@
;;; Copyright © 2023 Saku Laesvuori <saku@laesvuori.fi>
;;; Copyright © 2023 Lu Hui <luhux76@gmail.com>
;;; Copyright © 2023 Camilo Q.S. (Distopico) <distopico@riseup.net>
;;; Copyright © 2024 Ricardo Wurmus <rekado@elephly.net>
;;;
;;; This file is part of GNU Guix.
;;;
@ -613,17 +614,18 @@ (define-public tgl
(base32 "0cf5s7ygslb5klg1qv9qdc3hivhspmvh3zkacyyhd2yyikb5p0f9"))))
(build-system gnu-build-system)
(arguments
`(#:tests? #f ; No target
(list
#:tests? #f ; No target
#:imported-modules
((guix build copy-build-system)
`((guix build copy-build-system)
,@%gnu-build-system-modules)
#:modules
(((guix build copy-build-system)
'(((guix build copy-build-system)
#:prefix copy:)
(guix build gnu-build-system)
(guix build utils))
#:configure-flags
(list
'(list
;; Use gcrypt instead of openssl.
"--disable-openssl"
;; Enable extended queries system.
@ -631,11 +633,10 @@ (define-public tgl
;; Include libevent-based net and timers.
"--enable-libevent")
#:phases
(modify-phases %standard-phases
'(modify-phases %standard-phases
(add-after 'unpack 'trigger-bootstrap
(lambda _
(delete-file "configure")
#t))
(delete-file "configure")))
(add-after 'trigger-bootstrap 'patch-tl-parser
(lambda _
(delete-file "Makefile.tl-parser")
@ -643,8 +644,11 @@ (define-public tgl
(("include \\$\\{srcdir\\}/Makefile\\.tl-parser")
"")
(("\\$\\{EXE\\}/tl-parser")
"tl-parser"))
#t))
"tl-parser"))))
(add-after 'unpack 'remove-Werror
(lambda _
(substitute* "Makefile.in"
(("-Werror") ""))))
(replace 'install
(lambda args
(apply (assoc-ref copy:%standard-phases 'install)