From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([2001:470:142:3::10]:43738) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1iYE76-0002wS-MV for guix-patches@gnu.org; Fri, 22 Nov 2019 13:57:05 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1iYE75-00044F-4p for guix-patches@gnu.org; Fri, 22 Nov 2019 13:57:04 -0500 Received: from debbugs.gnu.org ([209.51.188.43]:46686) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1iYE75-000447-1A for guix-patches@gnu.org; Fri, 22 Nov 2019 13:57:03 -0500 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1iYE74-0000qS-W8 for guix-patches@gnu.org; Fri, 22 Nov 2019 13:57:03 -0500 Subject: [bug#38326] [PATCH 2/2] gnu: Add emacs-telega. Resent-Message-ID: Received: from eggs.gnu.org ([2001:470:142:3::10]:43659) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1iYE6H-0002VX-9B for guix-patches@gnu.org; Fri, 22 Nov 2019 13:56:15 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1iYE6F-0003nv-OZ for guix-patches@gnu.org; Fri, 22 Nov 2019 13:56:13 -0500 Received: from mout02.posteo.de ([185.67.36.66]:52789) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1iYE6F-0003nj-FK for guix-patches@gnu.org; Fri, 22 Nov 2019 13:56:11 -0500 Received: from submission (posteo.de [89.146.220.130]) by mout02.posteo.de (Postfix) with ESMTPS id 752AA2400E6 for ; Fri, 22 Nov 2019 19:56:09 +0100 (CET) Received: from customer (localhost [127.0.0.1]) by submission (posteo.de) with ESMTPSA id 47KQcm0MfPz9rxN for ; Fri, 22 Nov 2019 19:56:07 +0100 (CET) From: Brett Gilio Date: Fri, 22 Nov 2019 12:56:15 -0600 Message-ID: <87k17rviy8.fsf@posteo.net> MIME-Version: 1.0 Content-Type: text/x-patch Content-Disposition: inline; filename=0002-gnu-Add-emacs-telega.patch Content-Description: [PATCH 2/2] gnu: Add emacs-telega. List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+kyle=kyleam.com@gnu.org Sender: "Guix-patches" To: 38326@debbugs.gnu.org >From c632d01dd48f89dab2822d5a81d091ca68b43c62 Mon Sep 17 00:00:00 2001 From: Brett Gilio Date: Fri, 22 Nov 2019 12:54:44 -0600 Subject: [PATCH 2/2] gnu: Add emacs-telega. * gnu/packages/emacs-xyz.scm (emacs-telega): New variable. --- gnu/packages/emacs-xyz.scm | 58 ++++++++++++++++++++++++++++++++++++++ 1 file changed, 58 insertions(+) diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm index 0caf12a423..7ff53ecf1e 100644 --- a/gnu/packages/emacs-xyz.scm +++ b/gnu/packages/emacs-xyz.scm @@ -114,6 +114,7 @@ #:use-module (gnu packages image) #:use-module (gnu packages linux) #:use-module (gnu packages libevent) + #:use-module (gnu packages messaging) #:use-module (gnu packages music) #:use-module (gnu packages version-control) #:use-module (gnu packages imagemagick) @@ -19943,3 +19944,60 @@ Google guidelines.") (description "Helm Fish Completion is a Helm interface for Emacs fish-completion. It can be used in both Eshell and M-x shell.") (license license:gpl3+)))) + +(define-public emacs-telega + (let ((commit "019e923f933370d75dbe0a8473a18eb66fe94c0e") + (revision "1") + (version "0.4.4")) + (package + (name "emacs-telega") + (version (git-version version revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/zevlg/telega.el.git") + (commit commit))) + (sha256 + (base32 + "058814agkq8mp9ajpj8sz51rm9nigs2xpsdij05wjkxhfq30kqva")) + (file-name (git-file-name name version)))) + (build-system gnu-build-system) + (arguments + `(#:tests? #f + #:modules ((guix build gnu-build-system) + ((guix build emacs-build-system) #:prefix emacs:) + (guix build utils) + (guix build emacs-utils)) + #:imported-modules (,@%gnu-build-system-modules + (guix build emacs-build-system) + (guix build emacs-utils)) + #:phases + (modify-phases %standard-phases + (add-after 'unpack 'unpack-patch + (lambda _ + (substitute* "server/Makefile" + (("CC=cc") + "CC=gcc") + (("INSTALL_PREFIX=\\$\\(HOME\\)/.telega") + (string-append "INSTALL_PREFIX=" (assoc-ref %outputs "out") "/bin"))))) + (delete 'configure) + + ;; Build emacs-side using `emacs-build-system' + (add-after 'compress-documentation 'emacs-add-source-to-load-path + (assoc-ref emacs:%standard-phases 'add-source-to-load-path)) + (add-after 'emacs-set-emacs-load-path 'emacs-install + (assoc-ref emacs:%standard-phases 'install)) + (add-after 'emacs-install 'emacs-build + (assoc-ref emacs:%standard-phases 'build)) + (add-after 'emacs-install 'emacs-make-autoloads + (assoc-ref emacs:%standard-phases 'make-autoloads))))) + (propagated-inputs + `(("emacs-visual-fill-column" ,emacs-visual-fill-column))) + (native-inputs + `(("tdlib" ,tdlib) + ("emacs" ,emacs-minimal))) + (synopsis "GNU Emacs telegram client") + (description "Telega is full-featured, unofficial client for Telegram platform for GNU Emacs.") + (home-page "https://github.com/zevlg/telega.el") + (license license:gpl3+)))) -- 2.24.0