branch: externals/tmr commit e9c6c8861f0b7d60ef035dc02a6d733bda7d9654 Author: Daniel Mendler <m...@daniel-mendler.de> Commit: Protesilaos Stavrou <i...@protesilaos.com>
Get rid of tmr-descriptions-list We reuse the history variable. This way we get a "self-configuring" description list. Entries can be added by directly inputting them. Undesired entries can be deleted via Embark `M-x embark-act \`. --- tmr.el | 10 +--------- 1 file changed, 1 insertion(+), 9 deletions(-) diff --git a/tmr.el b/tmr.el index 818ee44340..6e821ab4d7 100644 --- a/tmr.el +++ b/tmr.el @@ -42,14 +42,6 @@ "TMR May Ring: set timers using a simple notation." :group 'data) -(defcustom tmr-descriptions-list (list "Boil water" "Prepare tea" "Bake bread") - "Optional description candidates for the current `tmr'. -These are provided as completion candidates when `tmr' is called -with a DESCRIPTION argument or when `tmr-with-description' is -used." - :type '(repeat string) - :group 'tmr) - (defcustom tmr-timer-created-functions (list #'tmr-print-message-for-created-timer) "Functions to execute when a timer is created. @@ -292,7 +284,7 @@ If optional DEFAULT is provided use it as a default candidate." `(metadata (display-sort-function . ,#'identity) (cycle-sort-function . ,#'identity)) (complete-with-action - action tmr-descriptions-list string predicate))) + action tmr--description-hist string predicate))) nil nil nil 'tmr--description-hist default))