From patchwork Tue Sep 20 10:00:54 2022 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Patchwork-Submitter: Efraim Flashner X-Patchwork-Id: 42772 Return-Path: X-Original-To: patchwork@mira.cbaines.net Delivered-To: patchwork@mira.cbaines.net Received: by mira.cbaines.net (Postfix, from userid 113) id B989F27BBEA; Tue, 20 Sep 2022 11:58:25 +0100 (BST) X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on mira.cbaines.net X-Spam-Level: X-Spam-Status: No, score=-2.7 required=5.0 tests=BAYES_00,DKIM_INVALID, DKIM_SIGNED,MAILING_LIST_MULTI,SPF_HELO_PASS,URIBL_BLOCKED autolearn=unavailable autolearn_force=no version=3.4.6 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) by mira.cbaines.net (Postfix) with ESMTPS id 376B727BBE9 for ; Tue, 20 Sep 2022 11:58:25 +0100 (BST) Received: from localhost ([::1]:41928 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1oaaxM-0001ZY-Bc for patchwork@mira.cbaines.net; Tue, 20 Sep 2022 06:58:24 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:48642) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1oaa4u-0006VO-N3 for guix-patches@gnu.org; Tue, 20 Sep 2022 06:02:12 -0400 Received: from debbugs.gnu.org ([209.51.188.43]:57026) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1oaa4o-00077a-KT for guix-patches@gnu.org; Tue, 20 Sep 2022 06:02:03 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1oaa4o-0003wn-5A for guix-patches@gnu.org; Tue, 20 Sep 2022 06:02:02 -0400 X-Loop: help-debbugs@gnu.org Subject: [bug#57952] [PATCH] gnu: Add guix-send-email. Resent-From: Efraim Flashner Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Tue, 20 Sep 2022 10:02:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 57952 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: 57952@debbugs.gnu.org Cc: Efraim Flashner X-Debbugs-Original-To: guix-patches@gnu.org Received: via spool by submit@debbugs.gnu.org id=B.166366808015091 (code B ref -1); Tue, 20 Sep 2022 10:02:01 +0000 Received: (at submit) by debbugs.gnu.org; 20 Sep 2022 10:01:20 +0000 Received: from localhost ([127.0.0.1]:56104 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1oaa48-0003vL-Cs for submit@debbugs.gnu.org; Tue, 20 Sep 2022 06:01:20 -0400 Received: from lists.gnu.org ([209.51.188.17]:39538) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1oaa46-0003vD-Mc for submit@debbugs.gnu.org; Tue, 20 Sep 2022 06:01:19 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:57524) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1oaa44-0006Db-Kj for guix-patches@gnu.org; Tue, 20 Sep 2022 06:01:18 -0400 Received: from mail-ej1-x62f.google.com ([2a00:1450:4864:20::62f]:42995) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1oaa41-000710-TF for guix-patches@gnu.org; Tue, 20 Sep 2022 06:01:16 -0400 Received: by mail-ej1-x62f.google.com with SMTP id sb3so4817626ejb.9 for ; Tue, 20 Sep 2022 03:01:12 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20210112; h=content-transfer-encoding:mime-version:message-id:date:subject:cc :to:from:sender:from:to:cc:subject:date; bh=V9kSM4izgiDkxxt2OQkSNiqjugdOaBpy79xK+bXLGTs=; b=CrivuZF+XDy4FntA+xXOP7WW40WNFEGoiuoeSvhe4wZ8V3hKkss7cA2yVEUsr8VNf0 pOMoaY2zKqltLesgBZwu+15ryJigULHot1ozGnwV3r+kQRcJ+8RdqCSHd/bjj1JZvOat H6RP7qzeFprcv5uYMVMB/K/bV93nEWA6uaZajS+/2HUYCZf8kyXZ0cCj9uMGrLjmzINj iUO0gURVfOwDW9nXtUu9RN06S9NoM9iGPyep0vby8GYHi9Wppo5Mp1Kq+5QyLxZNOtlR NK+XhbMvUFp/LMJdziK0SQ3xNAaogMyddexOSs2w8rPqQzFvgktkFQ0s1FqocuJYpWdC CSmA== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20210112; h=content-transfer-encoding:mime-version:message-id:date:subject:cc :to:from:sender:x-gm-message-state:from:to:cc:subject:date; bh=V9kSM4izgiDkxxt2OQkSNiqjugdOaBpy79xK+bXLGTs=; b=bjfAocdWahZK4EiGIYLOHUffbnSUcjXkGrXHh5/03QvgyRy5GlAAPM2vFY6yggL37m J6XYPs3sVbgKb9GbuevbVpg2M/5Rc0H/hZ6/CKPsEgB49TIC3ELbzVN+p92zcz1pNJnh D4rjpbFyx38jdmQlixyxJqnPf638D48DD8fTD60KeCAkQF75mXzPDQrFldrN11gfnrCa ZDcwwuQsmROKYquTaG8iEJk2RbfdxySiyfsy4sSnjPVDqlC/qE/grAtpJfd0CveXNlW7 YpniHKovxVX1iXM+Qy+At/LTDmGtPubhMCPMwWHomQ9Qv3aNIRh6n1WpjMqGOL4mO0CP K3+w== X-Gm-Message-State: ACrzQf3K0BssLGqkm9Hh8EbinnN+jbEqUJ/7VtipXg5w4hcPig2afRHu bfpx6EDnLNglxhYla8X7eR/3rgi416/p4g== X-Google-Smtp-Source: AMsMyM7pGOlufwfE6xnQ3+DvXfaSgtZLL3v/nHAuAvCr7GzizmkHTWIQhdONFDY92+jMxRB7VamVBA== X-Received: by 2002:a17:906:7944:b0:73c:838:ac3d with SMTP id l4-20020a170906794400b0073c0838ac3dmr16234682ejo.242.1663668071226; Tue, 20 Sep 2022 03:01:11 -0700 (PDT) Received: from localhost ([188.120.129.122]) by smtp.gmail.com with ESMTPSA id a25-20020a50e719000000b00452ff2c203asm972398edn.92.2022.09.20.03.01.10 (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Tue, 20 Sep 2022 03:01:10 -0700 (PDT) From: Efraim Flashner Date: Tue, 20 Sep 2022 13:00:54 +0300 Message-Id: <19f63e3d16273f9d43f61890b0c8472afaa75d3f.1663668015.git.efraim@flashner.co.il> X-Mailer: git-send-email 2.37.3 MIME-Version: 1.0 Received-SPF: pass client-ip=2a00:1450:4864:20::62f; envelope-from=efraim.flashner@gmail.com; helo=mail-ej1-x62f.google.com X-Spam_score_int: -14 X-Spam_score: -1.5 X-Spam_bar: - X-Spam_report: (-1.5 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_EF=-0.1, FREEMAIL_FORGED_FROMDOMAIN=0.25, FREEMAIL_FROM=0.001, HEADER_FROM_DIFFERENT_DOMAINS=0.25, RCVD_IN_DNSWL_NONE=-0.0001, SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=no autolearn_force=no X-Spam_action: no action X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: guix-patches@gnu.org List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+patchwork=mira.cbaines.net@gnu.org Sender: "Guix-patches" X-getmail-retrieved-from-mailbox: Patches * gnu/packages/guix-extensions.scm (guix-send-email): New variable. * gnu/local.mk (GNU_SYSTEM_MODULES): Add guix-extensions. --- gnu/local.mk | 1 + gnu/packages/guix-extensions.scm | 62 ++++++++++++++++++++++++++++++++ 2 files changed, 63 insertions(+) create mode 100644 gnu/packages/guix-extensions.scm base-commit: 5a9e3b7c3981f684f601e2d21e8202223b384de9 diff --git a/gnu/local.mk b/gnu/local.mk index 238fb72bc5..ba28788776 100644 --- a/gnu/local.mk +++ b/gnu/local.mk @@ -295,6 +295,7 @@ GNU_SYSTEM_MODULES = \ %D%/packages/guile.scm \ %D%/packages/guile-wm.scm \ %D%/packages/guile-xyz.scm \ + %D%/packages/guix-extensions.scm \ %D%/packages/gv.scm \ %D%/packages/gxmessage.scm \ %D%/packages/hardware.scm \ diff --git a/gnu/packages/guix-extensions.scm b/gnu/packages/guix-extensions.scm new file mode 100644 index 0000000000..bb23b59de4 --- /dev/null +++ b/gnu/packages/guix-extensions.scm @@ -0,0 +1,62 @@ +;;; Copyright © 2022 Efraim Flashner +;;; +;;; GNU Guix is free software; you can redistribute it and/or modify it +;;; under the terms of the GNU General Public License as published by +;;; the Free Software Foundation; either version 3 of the License, or (at +;;; your option) any later version. +;;; +;;; GNU Guix is distributed in the hope that it will be useful, but +;;; WITHOUT ANY WARRANTY; without even the implied warranty of +;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;;; GNU General Public License for more details. +;;; +;;; You should have received a copy of the GNU General Public License +;;; along with GNU Guix. If not, see . + +(define-module (gnu packages guix-extensions) + #:use-module ((guix licenses) #:prefix license:) + #:use-module (guix gexp) + #:use-module (guix packages) + #:use-module (guix build-system trivial) + #:use-module (gnu packages version-control)) + +(define-public guix-send-email + (package + (name "guix-send-email") + (version "0") + (source #f) + (build-system trivial-build-system) + (arguments + (list + #:modules '((guix build utils)) + #:builder + #~(begin + (use-modules (guix build utils)) + (let ((dest (string-append #$output + "/share/guix/extensions/send-email.scm")) + (git #$(this-package-input "git")) + (git-send-email (assoc-ref %build-inputs "git:send-email"))) + (mkdir-p (dirname dest)) + (with-output-to-file dest + (lambda () + (format #t +"(define-module (guix extensions send-email)~@ + #:use-module (guix scripts)~@ + #:export (guix-send-email))~@ +~@ +(define-command (guix-send-email . args)~@ + (category extension)~@ + (synopsis \"Replace 'guix send-email' with 'git send-email'\")~@ + (setenv \"GIT_EXEC_PATH\" \"~a/libexec/git-core\")~@ + (apply system* \"~a/bin/git\" \"send-email\" args))~%" + git-send-email git))))))) + (home-page "") ; Should be documentation location for GUIX_EXTENSIONS_PATH + (inputs + `(("git" ,git) + ("git:send-email" ,git "send-email"))) + (synopsis "Replace @code{guix send-email} with @code{git send-email}") + (description "This Guix extension provides a shell redirect from @code{guix +send-email} to @code{git send-email}.") + ;; The package definition is longer than the code; + ;; let this serve as the declaration of the license. + (license license:gpl3+)))