From mboxrd@z Thu Jan 1 00:00:00 1970 Received: from eggs.gnu.org ([2001:4830:134:3::10]:60968) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1el8sH-0004B1-HU for guix-patches@gnu.org; Mon, 12 Feb 2018 02:50:06 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1el8sE-0002UU-4D for guix-patches@gnu.org; Mon, 12 Feb 2018 02:50:05 -0500 Received: from debbugs.gnu.org ([208.118.235.43]:59227) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1el8sE-0002U6-0S for guix-patches@gnu.org; Mon, 12 Feb 2018 02:50:02 -0500 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1el8sD-0001oA-Lf for guix-patches@gnu.org; Mon, 12 Feb 2018 02:50:01 -0500 Subject: [bug#30433] [PATCH] gnu: Add epipe. Resent-Message-ID: Received: from eggs.gnu.org ([2001:4830:134:3::10]:60273) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1el8rU-0003ZK-02 for guix-patches@gnu.org; Mon, 12 Feb 2018 02:49:17 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1el8rQ-0001aU-KL for guix-patches@gnu.org; Mon, 12 Feb 2018 02:49:16 -0500 Received: from mail-lf0-x229.google.com ([2a00:1450:4010:c07::229]:36422) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1el8rQ-0001YO-Ca for guix-patches@gnu.org; Mon, 12 Feb 2018 02:49:12 -0500 Received: by mail-lf0-x229.google.com with SMTP id t79so19178033lfe.3 for ; Sun, 11 Feb 2018 23:49:12 -0800 (PST) From: Oleg Pykhalov Date: Mon, 12 Feb 2018 10:48:51 +0300 Message-Id: <20180212074851.3515-1-go.wigust@gmail.com> 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: 30433@debbugs.gnu.org * gnu/packages/emacs.scm (epipe): New public variable. --- gnu/packages/emacs.scm | 45 +++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 45 insertions(+) diff --git a/gnu/packages/emacs.scm b/gnu/packages/emacs.scm index 99e78d454..98d0ee1fb 100644 --- a/gnu/packages/emacs.scm +++ b/gnu/packages/emacs.scm @@ -7064,3 +7064,48 @@ navigation with the grails mode.") @code{org-tree-slide-mode} to enter the slideshow mode, and then @kbd{C->} and @kbd{C-<} to jump to the next and previous slide.") (license license:gpl3+)))) + +(define-public epipe + (let ((commit "c966d549d5416fb92ecf4bd4a0a5a8fc9239e3af") + (revision "1")) + (package + (name "epipe") + (version (string-append "0.0.1" "-" revision "." + (string-take commit 7))) + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/cute-jumper/epipe") + (commit commit))) + (file-name (string-append name "-" version "-checkout")) + (sha256 + (base32 + "0lkisi1s7sn12nx8zh58qmsxwnk1rjwryj18wcbr148xqz3swg57")))) + (build-system trivial-build-system) + (inputs + `(("bash" ,bash) + ("perl" ,perl))) + (arguments + '(#:modules ((guix build utils)) + #:builder + (begin + (use-modules (guix build utils)) + ;; Copy source + (copy-recursively (assoc-ref %build-inputs "source") ".") + ;; Patch shebangs + (substitute* "epipe" + (("/usr/bin/env bash") + (string-append (assoc-ref %build-inputs "bash") "/bin/bash"))) + (substitute* "epipe.pl" + (("/usr/bin/perl") + (string-append (assoc-ref %build-inputs "perl") "/bin/perl"))) + ;; Installation + (for-each (lambda (file) + (install-file file (string-append %output "/bin"))) + '("epipe" "epipe.pl")) + #t))) + (home-page "https://github.com/cute-jumper/epipe") + (synopsis "Pipe to the @code{emacsclient}") + (description "@code{epipe} provides an utility to use your editor in +the pipeline, featuring the support for running @code{emacsclient}.") + (license license:gpl3+)))) -- 2.15.1