[nongnu] elpa/hyperdrive f5d14e4226 050/102: Change: (hyperdrive-preferred-naming) Rename from -default-host-format

[ELPA Syncer]

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

    Change: (hyperdrive-preferred-naming) Rename from -default-host-format
---
 DEV.org            | 2 +-
 doc/hyperdrive.org | 7 ++++---
 hyperdrive-lib.el  | 4 ++--
 hyperdrive-vars.el | 4 ++--
 4 files changed, 9 insertions(+), 8 deletions(-)

diff --git a/DEV.org b/DEV.org
index 9b2ee312f3..977e27b9e0 100644
--- a/DEV.org
+++ b/DEV.org
@@ -25,7 +25,7 @@
 + *Internals*
   + [X] Add a ~petname~ field to the ~hyperdrive~ struct.
   + [X] Add /petnames/ support to ~hyperdrive--format-host~.
-  + [X] Add petname to ~hyperdrive-default-host-format~.
+  + [X] Add petname to ~hyperdrive-preferred-naming~.
   + [X] Add petname face.
   + [X] Add faces for all types of hostname formats.
   + [X] Change ~public-name~ to ~nickname~ everywhere.
diff --git a/doc/hyperdrive.org b/doc/hyperdrive.org
index 640dc94f02..70150f1ec4 100644
--- a/doc/hyperdrive.org
+++ b/doc/hyperdrive.org
@@ -848,9 +848,10 @@ DIRECTION being one of ~:ascending~ or ~:descending~.
 - ~hyperdrive-history-display-buffer-action~ :: Display buffer action
   for hyperdrive history buffers. Passed to ~display-buffer~, which see.
 
-#+vindex: hyperdrive-default-host-format
-- ~hyperdrive-default-host-format~ :: Default format for displaying
-  hyperdrive hostnames. See [[*Naming][Naming]] section for what this means.
+#+vindex: hyperdrive-preferred-naming
+- ~hyperdrive-preferred-naming~ :: List of metadata types used to
+  display hyperdrives.  Hyperdrives are displayed using the first
+  available metadata type.  See [[*Naming][Naming]] section for what this 
means.
 
 #+vindex: hyperdrive-stream-player-command
 - ~hyperdrive-stream-player-command~ :: Command used to play streamable
diff --git a/hyperdrive-lib.el b/hyperdrive-lib.el
index 27fcde5459..52aa061380 100644
--- a/hyperdrive-lib.el
+++ b/hyperdrive-lib.el
@@ -968,10 +968,10 @@ Path and target fragment are URI-encoded."
       url)))
 
 (cl-defun hyperdrive--format-host
-    (hyperdrive &key with-label (format hyperdrive-default-host-format) 
(with-faces t))
+    (hyperdrive &key with-label (format hyperdrive-preferred-naming) 
(with-faces t))
   "Return HYPERDRIVE's formatted hostname, or nil.
 FORMAT should be one or a list of symbols, by default
-`hyperdrive-default-host-format', which see for choices.  If the
+`hyperdrive-preferred-naming', which see for choices.  If the
 specified FORMAT is not available, returns nil.  If WITH-LABEL,
 prepend a label for the kind of format used (e.g. \"petname:\").
 When WITH-FACES is nil, don't add face text properties."
diff --git a/hyperdrive-vars.el b/hyperdrive-vars.el
index abf1b493c1..f175a10de8 100644
--- a/hyperdrive-vars.el
+++ b/hyperdrive-vars.el
@@ -118,7 +118,7 @@ Passed to `display-buffer', which see."
                  (const :tag "Pop up window" (display-buffer-pop-up-window))
                  (sexp :tag "Other")))
 
-(defcustom hyperdrive-default-host-format
+(defcustom hyperdrive-preferred-naming
   '(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
@@ -177,7 +177,7 @@ Specifiers:
 
 %n  Entry name
 %p  Entry path
-%H  Hyperdrive default host format (see `hyperdrive-default-host-format')
+%H  Preferred hyperdrive naming (see `hyperdrive-preferred-naming')
 
 The format of the following specifiers can be configured using
 `hyperdrive-format-alist':