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

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

[nongnu] elpa/hyperdrive d76de4842b 072/102: Change: (-preferred-formats


From: ELPA Syncer
Subject: [nongnu] elpa/hyperdrive d76de4842b 072/102: Change: (-preferred-formats) Move into hyperdrive-entry-format group
Date: Wed, 29 Nov 2023 04:00:55 -0500 (EST)

branch: elpa/hyperdrive
commit d76de4842bd7aca91c127e98aee1491b86c7286d
Author: Joseph Turner <joseph@ushin.org>
Commit: Adam Porter <adam@alphapapa.net>

    Change: (-preferred-formats) Move into hyperdrive-entry-format group
---
 hyperdrive-vars.el | 32 ++++++++++++++++----------------
 1 file changed, 16 insertions(+), 16 deletions(-)

diff --git a/hyperdrive-vars.el b/hyperdrive-vars.el
index 2130b67d28..9cb3a88b6a 100644
--- a/hyperdrive-vars.el
+++ b/hyperdrive-vars.el
@@ -118,22 +118,6 @@ Passed to `display-buffer', which see."
                  (const :tag "Pop up window" (display-buffer-pop-up-window))
                  (sexp :tag "Other")))
 
-(defcustom h/preferred-formats
-  '(petname nickname domain seed short-key public-key)
-  "Default format for displaying hyperdrive hostnames.
-Each option is checked in order, and the first available type is
-used."
-  :type '(repeat
-          (choice (const :tag "Petname" petname)
-                  (const :tag "Nickname"
-                         :doc "(Nickname specified by hyperdrive author)"
-                         :format "%t %h"
-                         nickname)
-                  (const :tag "DNSLink domain" domain)
-                  (const :tag "Seed" seed)
-                  (const :tag "Shortened public key" short-key)
-                  (const :tag "Full public key" public-key))))
-
 (defcustom h/stream-player-command "mpv --force-window=immediate %s"
   "Command used to play streamable URLs externally.
 In the command, \"%s\" is replaced with the URL (it should not be
@@ -171,6 +155,22 @@ an existing buffer at the same version, or make a new 
buffer."
   "Formatting of entries for buffer names, etc."
   :group 'hyperdrive)
 
+(defcustom h/preferred-formats
+  '(petname nickname domain seed short-key public-key)
+  "Default format for displaying hyperdrive hostnames.
+Each option is checked in order, and the first available type is
+used."
+  :type '(repeat
+          (choice (const :tag "Petname" petname)
+                  (const :tag "Nickname"
+                         :doc "(Nickname specified by hyperdrive author)"
+                         :format "%t %h"
+                         nickname)
+                  (const :tag "DNSLink domain" domain)
+                  (const :tag "Seed" seed)
+                  (const :tag "Shortened public key" short-key)
+                  (const :tag "Full public key" public-key))))
+
 (defcustom h/default-entry-format "[%H] %p%v"
   "Format string for displaying entries.
 Specifiers:



reply via email to

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