From 43d727e71ad6839b70f22e7ea11a0637f39eebad Mon Sep 17 00:00:00 2001
From: Tristan Riehs <tristan.riehs@bordeaux-inp.fr>
Date: Tue, 19 Mar 2024 13:18:39 +0100
Subject: Add history to edit-config
---
edit-config.el | 7 ++++++-
1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/edit-config.el b/edit-config.el
index 2dddb3d..7f54d99 100644
--- a/edit-config.el
+++ b/edit-config.el
@@ -58,6 +58,9 @@ Used when prompting only when `edit-config-missing' is non-nil. See
`edit-config-files' for the structure of CONFIG."
(file-exists-p (cdr config)))
+(defvar edit-config--hist nil
+ "History for `edit-config'.")
+
;;;###autoload
(defun edit-config (label)
"Edit the config file associated to LABEL."
@@ -68,7 +71,9 @@ Used when prompting only when `edit-config-missing' is non-nil. See
(if edit-config-missing
'edit-config--completing-read-predicate
nil)
- t)
+ t
+ nil
+ 'edit-config--hist)
nil)))
(if label
(find-file (alist-get label edit-config-files nil nil 'string-equal))
--
cgit v1.2.3