emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/hyperdrive ab2fb6e8ea 009/102: Change: (-menu-hyperdrive)


From: ELPA Syncer
Subject: [nongnu] elpa/hyperdrive ab2fb6e8ea 009/102: Change: (-menu-hyperdrive) Place mirror commands in separate column
Date: Wed, 29 Nov 2023 04:00:46 -0500 (EST)

branch: elpa/hyperdrive
commit ab2fb6e8ea4e27784e2838505398431b63b191d1
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>

    Change: (-menu-hyperdrive) Place mirror commands in separate column
---
 hyperdrive-menu.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/hyperdrive-menu.el b/hyperdrive-menu.el
index 2c2163f5b0..1561e774c5 100644
--- a/hyperdrive-menu.el
+++ b/hyperdrive-menu.el
@@ -237,14 +237,15 @@
    (:info (lambda () (format "Latest version: %s" (hyperdrive-latest-version 
(hyperdrive-menu--entry)))))]
   [["Open"
     ("f" "Find file" hyperdrive-menu-open-file)
-    ("v" "View file" hyperdrive-menu-view-file)]
-   ["Upload"
+    ("v" "View file" hyperdrive-menu-view-file)
+    "" "Upload"
     ("u f" "File" hyperdrive-menu-upload-file
      :inapt-if-not (lambda ()
                      (hyperdrive-writablep (hyperdrive-menu--entry))))
     ("u F" "Files" hyperdrive-menu-upload-files
      :inapt-if-not (lambda ()
-                     (hyperdrive-writablep (hyperdrive-menu--entry))))
+                     (hyperdrive-writablep (hyperdrive-menu--entry))))]
+   ["Mirror"
     ;; TODO: When `hyperdrive-mirror' is rewritten with transient.el, set the 
hyperdrive by default to the
     ("u m" "Mirror" hyperdrive-mirror
      :inapt-if-not (lambda ()



reply via email to

[Prev in Thread] Current Thread [Next in Thread]