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

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

[elpa] externals/dtache 0c8241a33d 107/158: Update actions from defvar t


From: ELPA Syncer
Subject: [elpa] externals/dtache 0c8241a33d 107/158: Update actions from defvar to defcustom
Date: Wed, 19 Jan 2022 18:58:03 -0500 (EST)

branch: externals/dtache
commit 0c8241a33d1a5bfb87ac9e1e0aaa859b722b5338
Author: Niklas Eklund <niklas.eklund@zenseact.com>
Commit: Niklas Eklund <niklas.eklund@posteo.net>

    Update actions from defvar to defcustom
---
 dtache-compile.el | 12 +++++++++---
 dtache-eshell.el  |  8 +++++++-
 dtache-shell.el   | 16 ++++++++++++----
 3 files changed, 28 insertions(+), 8 deletions(-)

diff --git a/dtache-compile.el b/dtache-compile.el
index 67a4fd4bc2..77fa927d41 100644
--- a/dtache-compile.el
+++ b/dtache-compile.el
@@ -29,7 +29,13 @@
 
 ;;;; Variables
 
-(defvar dtache-post-compile-session-action '(:attach dtache-compile-attach 
:view dtache-post-compile-session :run dtache-compile))
+(defcustom dtache-compile-session-action
+  '(:attach dtache-compile-attach
+            :view dtache-post-compile-session
+            :run dtache-compile)
+  "Actions for a session created with `dtache-compile'."
+  :group 'dtache
+  :type 'plist)
 
 ;;;; Commands
 
@@ -45,7 +51,7 @@ Optionally enable COMINT if prefix-argument is provided."
         command))
     (consp current-prefix-arg)))
   (let* ((dtache-enabled t)
-         (dtache-session-action dtache-post-compile-session-action)
+         (dtache-session-action dtache-compile-session-action)
          (dtache-session-origin 'compile)
          (dtache-session-mode 'create))
     (compile command comint)))
@@ -56,7 +62,7 @@ Optionally enable COMINT if prefix-argument is provided."
 Optionally EDIT-COMMAND."
   (interactive "P")
   (let* ((dtache-enabled t)
-         (dtache-session-action dtache-post-compile-session-action)
+         (dtache-session-action dtache-compile-session-action)
          (dtache-session-origin 'compile)
          (dtache-session-mode 'create))
     (recompile edit-command)))
diff --git a/dtache-eshell.el b/dtache-eshell.el
index 20d7c7294e..86ecca7bc1 100644
--- a/dtache-eshell.el
+++ b/dtache-eshell.el
@@ -32,7 +32,13 @@
 
 ;;;; Variables
 
-(defvar dtache-eshell-session-action '(:attach dtache-shell-command-attach 
:view dtache-view-dwim :run dtache-shell-command))
+(defcustom dtache-eshell-session-action
+  '(:attach dtache-shell-command-attach
+            :view dtache-view-dwim
+            :run dtache-shell-command)
+  "Actions for a session created with `dtache-eshell'."
+  :group 'dtache
+  :type 'plist)
 
 ;;;; Functions
 
diff --git a/dtache-shell.el b/dtache-shell.el
index e8278602ad..a353a72b41 100644
--- a/dtache-shell.el
+++ b/dtache-shell.el
@@ -29,10 +29,18 @@
 
 ;;;; Variables
 
-(defvar dtache-shell-history-file nil
-  "File to store history.")
-(defvar dtache-shell-session-action '(:attach dtache-shell-command-attach 
:view dtache-view-dwim :run dtache-shell-command)
-  "Actions for a session created with `dtache-shell'.")
+(defcustom dtache-shell-session-action
+  '(:attach dtache-shell-command-attach
+            :view dtache-view-dwim
+            :run dtache-shell-command)
+  "Actions for a session created with `dtache-shell'."
+  :group 'dtache
+  :type 'plist)
+
+(defcustom dtache-shell-history-file nil
+  "File to store history."
+  :type 'string
+  :group 'dtache)
 
 ;;;; Functions
 



reply via email to

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