[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/tmr bf0d6eebfb 1/4: Make tmr description history public
From: |
ELPA Syncer |
Subject: |
[elpa] externals/tmr bf0d6eebfb 1/4: Make tmr description history public |
Date: |
Tue, 28 Jun 2022 02:58:04 -0400 (EDT) |
branch: externals/tmr
commit bf0d6eebfbd535bfe58f672e4e6338f8938fbef9
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>
Make tmr description history public
---
tmr.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/tmr.el b/tmr.el
index cd614edc62..63bf0cdbb4 100644
--- a/tmr.el
+++ b/tmr.el
@@ -42,7 +42,7 @@
"TMR May Ring: set timers using a simple notation."
:group 'data)
-(defcustom tmr-description-list 'tmr--description-hist
+(defcustom tmr-description-list 'tmr-description-history
"List of timer description presets.
The value can either be a variable symbol or a list of strings."
:type '(choice symbol (repeat string)))
@@ -319,7 +319,7 @@ If DEFAULT is provided, use that as a default."
nil
'tmr--duration-hist def)))
-(defvar tmr--description-hist '()
+(defvar tmr-description-history '()
"Minibuffer history of `tmr' descriptions.")
(defun tmr--description-prompt (&optional default)
@@ -339,7 +339,7 @@ If optional DEFAULT is provided use it as a default
candidate."
(symbol-value tmr-description-list))
string predicate)))
nil nil nil
- 'tmr--description-hist default))
+ 'tmr-description-history default))
(defun tmr--complete (timer)
"Mark TIMER as completed and execute `tmr-timer-completed-functions'."