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

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

[nongnu] elpa/hyperdrive e3d22082cf 6/7: Tidy: Move gateway configuratio


From: ELPA Syncer
Subject: [nongnu] elpa/hyperdrive e3d22082cf 6/7: Tidy: Move gateway configuration into configuration section
Date: Sat, 31 Aug 2024 13:00:20 -0400 (EDT)

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

    Tidy: Move gateway configuration into configuration section
---
 hyperdrive-vars.el | 88 +++++++++++++++++++++++++++---------------------------
 1 file changed, 44 insertions(+), 44 deletions(-)

diff --git a/hyperdrive-vars.el b/hyperdrive-vars.el
index 35bd11e65d..741e499c03 100644
--- a/hyperdrive-vars.el
+++ b/hyperdrive-vars.el
@@ -271,6 +271,50 @@ value (and should only be present once in the string).  
Used in
                (cons :tag "Hyperdrive domains" (const domains)
                      (string :tag "Format string"))))
 
+;;;;;; Gateway configuration
+
+(defgroup hyperdrive-gateway nil
+  "Starting and stopping the gateway."
+  :group 'hyperdrive)
+
+(declare-function h//gateway-start-default "hyperdrive-lib")
+(defcustom h/gateway-start-function #'h//gateway-start-default
+  "Function called to start the gateway.
+If this function signals an error, the `h/gateway-ready-hook'
+will not be run; otherwise, the hook will be run when the gateway
+appears to be ready."
+  :type 'function)
+
+(declare-function h//gateway-stop-default "hyperdrive-lib")
+(defcustom h/gateway-stop-function #'h//gateway-stop-default
+  "Function called to stop the gateway.
+This function should signal an error if it fails to stop the
+gateway process."
+  :type 'function)
+
+(declare-function h/gateway-live-p-default "hyperdrive-lib")
+(defcustom h/gateway-live-predicate #'h/gateway-live-p-default
+  "Predicate function which returns non-nil if the gateway process is live."
+  :type 'function)
+
+(defcustom h/gateway-ready-hook
+  '( h/check-gateway-version
+     h/announce-gateway-ready
+     h/menu-refresh)
+  "Hook called when gateway is ready after starting it.
+This hook is called by `hyperdrive--gateway-wait-for-ready' after
+`hyperdrive-start'."
+  :type 'hook)
+
+(defcustom h/gateway-dead-hook
+  '( h//gateway-cleanup-default
+     h/announce-gateway-stopped
+     h/menu-refresh)
+  "Hook called when gateway is ready after stopping it.
+This hook is called by `hyperdrive--gateway-wait-for-dead' after
+`hyperdrive-stop'."
+  :type 'hook)
+
 ;;;;; Faces
 
 (defgroup hyperdrive-faces nil
@@ -439,50 +483,6 @@ Keys are regexps matched against MIME types.")
            :desc "Name"))
   "Fields for sorting hyperdrive directory buffer columns.")
 
-;;;;;; Gateway configuration
-
-(defgroup hyperdrive-gateway nil
-  "Starting and stopping the gateway."
-  :group 'hyperdrive)
-
-(declare-function h//gateway-start-default "hyperdrive-lib")
-(defcustom h/gateway-start-function #'h//gateway-start-default
-  "Function called to start the gateway.
-If this function signals an error, the `h/gateway-ready-hook'
-will not be run; otherwise, the hook will be run when the gateway
-appears to be ready."
-  :type 'function)
-
-(declare-function h//gateway-stop-default "hyperdrive-lib")
-(defcustom h/gateway-stop-function #'h//gateway-stop-default
-  "Function called to stop the gateway.
-This function should signal an error if it fails to stop the
-gateway process."
-  :type 'function)
-
-(declare-function h/gateway-live-p-default "hyperdrive-lib")
-(defcustom h/gateway-live-predicate #'h/gateway-live-p-default
-  "Predicate function which returns non-nil if the gateway process is live."
-  :type 'function)
-
-(defcustom h/gateway-ready-hook
-  '( h/check-gateway-version
-     h/announce-gateway-ready
-     h/menu-refresh)
-  "Hook called when gateway is ready after starting it.
-This hook is called by `hyperdrive--gateway-wait-for-ready' after
-`hyperdrive-start'."
-  :type 'hook)
-
-(defcustom h/gateway-dead-hook
-  '( h//gateway-cleanup-default
-     h/announce-gateway-stopped
-     h/menu-refresh)
-  "Hook called when gateway is ready after stopping it.
-This hook is called by `hyperdrive--gateway-wait-for-dead' after
-`hyperdrive-stop'."
-  :type 'hook)
-
 ;;;; Footer
 
 (provide 'hyperdrive-vars)



reply via email to

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