[elpa] externals/dtache 125f100b20 087/158: Regroup variable section

[ELPA Syncer]

branch: externals/dtache
commit 125f100b20c7f357eec78d9bec609c9bfe45a5cf
Author: Niklas Eklund <niklas.eklund@posteo.net>
Commit: Niklas Eklund <niklas.eklund@posteo.net>

    Regroup variable section
---
 dtache.el | 28 ++++++++++++++++------------
 1 file changed, 16 insertions(+), 12 deletions(-)

diff --git a/dtache.el b/dtache.el
index 5612fb5101..2dc2a34c5d 100644
--- a/dtache.el
+++ b/dtache.el
@@ -53,6 +53,8 @@
 
 ;;;; Variables
 
+;;;;; Customizable
+
 (defvar dtache-session-directory nil
   "The directory to store `dtache' sessions.")
 (defvar dtache-db-directory user-emacs-directory
@@ -79,18 +81,6 @@
   "A property list defining how often to run a timer.")
 (defvar dtache-shell-command-action '(:attach dtache-shell-command-attach 
:view dtache-view-dwim)
   "Actions for a session created with `dtache-shell-command'.")
-
-(defvar dtache-enabled nil)
-(defvar dtache-session-mode nil
-  "Mode of operation for session.
-Valid values are: create, new and attach")
-(defvar dtache-session-origin nil
-  "Variable to specify the origin of the session.")
-(defvar dtache-session-action nil
-  "A property list of actions for a session.")
-(defvar dtache-shell-command-history nil
-  "History of commands run with `dtache-shell-command'.")
-
 (defvar dtache-annotation-format
   `((:width 3 :function dtache--active-str :face dtache-active-face)
     (:width 3 :function dtache--status-str :face dtache-failure-face)
@@ -116,6 +106,19 @@ Valid values are: create, new and attach")
     (define-key map "=" #'dtache-diff-session)
     map))
 
+;;;;; Internal
+
+(defvar dtache-enabled nil)
+(defvar dtache-session-mode nil
+  "Mode of operation for session.
+Valid values are: create, new and attach")
+(defvar dtache-session-origin nil
+  "Variable to specify the origin of the session.")
+(defvar dtache-session-action nil
+  "A property list of actions for a session.")
+(defvar dtache-shell-command-history nil
+  "History of commands run with `dtache-shell-command'.")
+
 ;;;;; Faces
 
 (defgroup dtache-faces nil
@@ -172,6 +175,7 @@ Valid values are: create, new and attach")
 (make-variable-buffer-local 'dtache--buffer-session)
 (defvar dtache--session-candidates nil
   "An alist of session candidates.")
+
 (defconst dtache--dtach-eof-message "\\[EOF - dtach terminating\\]"
   "Message printed when `dtach' terminates.")
 (defconst dtache--dtach-detached-message "\\[detached\\]\^M"