[nongnu] elpa/hyperdrive 1b56ecd041 11/33: Change: (--easy-menu-contents) Format with parens instead of colon

[ELPA Syncer]

branch: elpa/hyperdrive
commit 1b56ecd0418f530661a85a3b0733acaa5d2ab341
Author: Joseph Turner <joseph@ushin.org>
Commit: Joseph Turner <joseph@ushin.org>

    Change: (--easy-menu-contents) Format with parens instead of colon
---
 hyperdrive.el | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/hyperdrive.el b/hyperdrive.el
index e67e620302..a04cf38ba0 100644
--- a/hyperdrive.el
+++ b/hyperdrive.el
@@ -802,7 +802,7 @@ The return value of this function is the retrieval buffer."
   '("Hyperdrive"
     ("Gateway"
      :label
-     (concat "Gateway: " (if (hyperdrive-status) "on" "off"))
+     (format "Gateway (%s)" (if (hyperdrive-status) "on" "off"))
      ["Start Gateway" hyperdrive-start
       :help "Start hyper-gateway"]
      ["Stop Gateway" hyperdrive-stop
@@ -816,8 +816,7 @@ The return value of this function is the retrieval buffer."
      :active hyperdrive-current-entry
      :label (if-let* ((entry hyperdrive-current-entry)
                       (hyperdrive (hyperdrive-entry-hyperdrive entry)))
-                (concat "Current drive: "
-                        (hyperdrive--format-host hyperdrive :with-label t))
+                (format "Current drive (%s)" (hyperdrive--format-host 
hyperdrive :with-label t))
               "Current drive")
      ["Petname" hyperdrive-set-petname
       :help "Set petname for hyperdrive"