TakeV/guix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

gnu: Add telegram-cli.

Browse source 
* gnu/packages/telegram.scm (telegram-cli): New variable.

Signed-off-by: Leo Prikler <leo.prikler@student.tugraz.at>
This commit is contained in:
Raghav Gururajan 2021-02-01 16:49:04 -05:00 committed by Leo Prikler
parent d1e7a01cea
commit 86f461d63a
No known key found for this signature in database
GPG key ID: 442A84B8C70E2F87
1 changed files with 97 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

97
gnu/packages/telegram.scm
View file

@ -43,14 +43,19 @@ (define-module (gnu packages telegram)
#:use-module (gnu packages libreoffice)
#:use-module (gnu packages linux)
#:use-module (gnu packages lxqt)
#:use-module (gnu packages lua)
#:use-module (gnu packages perl)
#:use-module (gnu packages pkg-config)
#:use-module (gnu packages protobuf)
#:use-module (gnu packages pulseaudio)
#:use-module (gnu packages python)
#:use-module (gnu packages qt)
#:use-module (gnu packages readline)
#:use-module (gnu packages textutils)
#:use-module (gnu packages telephony)
#:use-module (gnu packages tls)
#:use-module (gnu packages video)
#:use-module (gnu packages web)
#:use-module (gnu packages xiph)
#:use-module (gnu packages xorg)
#:use-module ((guix licenses) #:prefix license:)
@ -680,3 +685,95 @@ (define-public tgl
(description "TGL is the telegram library for telegram-cli.")
(home-page "https://github.com/vysheng/tgl")
(license license:lgpl2.1+))))
(define-public telegram-cli
(let ((commit "6547c0b21b977b327b3c5e8142963f4bc246187a")
(revision "324"))
(package
(name "telegram-cli")
(version
(git-version "1.3.1" revision commit))
(source
(origin
(method git-fetch)
(uri
(git-reference
(url "https://github.com/vysheng/tg.git")
(commit commit)))
(file-name
(git-file-name name version))
(sha256
(base32 "0c1w7jgska71jjbvg1y09v52549pwa4zkdjly18yxywn7gayd2p6"))))
(build-system gnu-build-system)
(arguments
`(#:tests? #f ; No target
#:imported-modules
((guix build copy-build-system)
,@%gnu-build-system-modules)
#:modules
(((guix build copy-build-system)
#:prefix copy:)
(guix build gnu-build-system)
(guix build utils))
#:configure-flags
(list
;; Use gcrypt instead of openssl.
"--disable-openssl")
#:phases
(modify-phases %standard-phases
(add-after 'unpack 'trigger-bootstrap
(lambda _
(delete-file "configure")
#t))
(add-after 'trigger-bootstrap 'patch-tgl-and-tlparser
(lambda* (#:key inputs #:allow-other-keys)
(for-each delete-file
(list
"Makefile.tgl"
"Makefile.tl-parser"))
(substitute* "Makefile.in"
(("include \\$\\{srcdir\\}/Makefile\\.tl-parser")
"")
(("include \\$\\{srcdir\\}/Makefile\\.tgl")
"")
(("-I\\$\\{srcdir\\}/tgl")
(string-append "-I" (assoc-ref inputs "tgl")
"/include/tgl"))
(("AUTO=auto")
(string-append "AUTO=" (assoc-ref inputs "tgl")
"/include/tgl/auto"))
(("LIB=libs")
(string-append "LIB=" (assoc-ref inputs "tgl")
"/lib/tgl")))
#t))
(replace 'install
(lambda args
(apply (assoc-ref copy:%standard-phases 'install)
#:install-plan
'(("bin" "bin")
("." "etc/telegram-cli"
#:include-regexp ("\\.pub$")
#:exclude ("tg-server.pub")))
args))))))
(native-inputs
`(("autoconf" ,autoconf)
("automake" ,automake)
("libtool" ,libtool)
("pkg-config" ,pkg-config)))
(inputs
`(("jansson" ,jansson)
("libconfig" ,libconfig)
("libevent" ,libevent)
("libgcrypt" ,libgcrypt)
("lua" ,lua)
("openssl" ,openssl)
("perl" ,perl)
("python" ,python)
("readline" ,readline)
("tgl" ,tgl)
("tl-parser" ,tl-parser)
("zlib" ,zlib)))
(synopsis "Telegram Messenger CLI")
(description "TG is the command-line interface for Telegram Messenger.")
(home-page "https://github.com/vysheng/tg")
(license license:gpl2+))))