This is an automated email from the git hooks/post-receive script.

guix_mirror_bot pushed a commit to branch master
in repository guix.

The following commit(s) were added to refs/heads/master by this push:
     new 8632aae122 gnu: emacs-xyz: Add emacs-ssh-tunnels
8632aae122 is described below

commit 8632aae122ffdb80d2f8d66fa72729a220636e3c
Author: Grigory Shepelev <[email protected]>
AuthorDate: Fri Nov 14 14:09:40 2025 +0300

    gnu: emacs-xyz: Add emacs-ssh-tunnels
    
    * gnu/packages/emacs-xyz.scm (emacs-ssh-tunnels): New variable.
    
    Closes guix/guix#4228
    
    Change-Id: I8b2feb93b1edb80dda7b83197e3dc57b5fc43c8b
    Co-authored-by: Cayetano Santos <[email protected]>
    Signed-off-by: Cayetano Santos <[email protected]>
---
 gnu/packages/emacs-xyz.scm | 39 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 39 insertions(+)

diff --git a/gnu/packages/emacs-xyz.scm b/gnu/packages/emacs-xyz.scm
index afa2ece5a7..5ecceef326 100644
--- a/gnu/packages/emacs-xyz.scm
+++ b/gnu/packages/emacs-xyz.scm
@@ -312,6 +312,7 @@
   #:use-module (gnu packages ocaml)
   #:use-module (gnu packages erlang)
   #:use-module (gnu packages search)
+  #:use-module (gnu packages ssh)
   #:use-module (gnu packages statistics)
   #:use-module (gnu packages libcanberra)
   #:use-module (gnu packages telegram)
@@ -38876,6 +38877,44 @@ global minor mode whose purpose is to automatically 
feed TRAMP sub-processes
 with passwords for paths matching regexps.")
       (license license:gpl3+))))
 
+(define-public emacs-ssh-tunnels
+  ;; There are no tags or releases upstream.
+  (let ((commit "5010d779edef33f869065231b99d74723c9c7eaf")
+        (revision "0"))
+    (package
+      (name "emacs-ssh-tunnels")
+      (version (git-version "1.0" revision commit))
+      (source
+       (origin
+         (method git-fetch)
+         (uri (git-reference
+                (url "https://github.com/death/ssh-tunnels";)
+                (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32
+           "15pwgc9s7f5fjmx2savjrpwr6qcpp0s9iy0y10abpy63np4krc62"))))
+      (build-system emacs-build-system)
+      (arguments
+       (list
+        #:tests? #f                     ;no tests
+        #:phases
+        #~(modify-phases %standard-phases
+            (add-after 'unpack 'set-ssh-location
+              (lambda* (#:key inputs #:allow-other-keys)
+                (emacs-substitute-variables "ssh-tunnels.el"
+                  ("ssh-tunnels-program"
+                   (search-input-file inputs "/bin/ssh"))))))))
+      (inputs (list openssh))
+      (propagated-inputs (list emacs-helm))
+      (home-page "https://github.com/death/ssh-tunnels";)
+      (synopsis "Manipulate @code{ssh} tunnels from Emacs")
+      (description "This package provides an Emacs interface to modify,
+run and kill @code{ssh} tunnels.  It lets customise descriptions of the
+tunnels configurations, and includes an @code{emacs-helm} interface to modify
+and act on tunnels.")
+      (license license:expat))))
+
 (define-public emacs-eacl
   (package
     (name "emacs-eacl")

Reply via email to