branch: externals/tmr
commit 9a0e72780e02a85a1595d1b1d56eeb663621a639
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Protesilaos Stavrou <i...@protesilaos.com>
Remove most autoloads
Since the tmr-prefix-map is autoloaded, this map should be usually bound
by the user. We still autoload the tmr and tmr-with-details commands,
in case the user prefers a single entry point but no prefix map.
---
README.org | 8 ++++++--
tmr.el | 7 -------
2 files changed, 6 insertions(+), 9 deletions(-)
diff --git a/README.org b/README.org
index ec9f7c326b..0611cdf8d6 100644
--- a/README.org
+++ b/README.org
@@ -342,16 +342,20 @@ Everything is in place to set up the package.
#+cindex: Package configuration
#+begin_src emacs-lisp
- ;; set to nil to disable the sound
+ ;; Set to nil to disable the sound
(setq tmr-sound-file
"/usr/share/sounds/freedesktop/stereo/alarm-clock-elapsed.oga")
+ ;; Desktop notification urgency level
(setq tmr-notification-urgency 'normal)
;; Read the `tmr-descriptions-list' doc string
(setq tmr-descriptions-list 'tmr-description-history)
- ;; OPTIONALLY set global prefix bindings (autoloaded):
+ ;; Set global prefix bindings (autoloaded):
(define-key global-map "\C-ct" 'tmr-prefix-map)
+
+ ;; Alternatively bind tmr command (autoloaded):
+ (define-key global-map "\C-ct" 'tmr)
#+end_src
* Integration with Embark
diff --git a/tmr.el b/tmr.el
index 1fea3567e9..90a2937f3a 100644
--- a/tmr.el
+++ b/tmr.el
@@ -264,7 +264,6 @@ Populated by `tmr' and then operated on by `tmr-cancel'.")
(defvar tmr--update-hook nil
"Hooks to execute when timers are changed.")
-;;;###autoload
(defun tmr-remove (timer)
"Cancel and remove TIMER object set with `tmr' command.
Interactively, let the user choose which timer to cancel with
@@ -275,7 +274,6 @@ completion."
(run-hooks 'tmr--update-hook)
(run-hook-with-args 'tmr-timer-cancelled-functions timer))
-;;;###autoload
(defun tmr-cancel (timer)
"Cancel TIMER object set with `tmr' command.
Interactively, let the user choose which timer to cancel with
@@ -284,7 +282,6 @@ chooses only among active timers."
(interactive (list (tmr--read-timer "Cancel timer: " :active)))
(tmr-remove timer))
-;;;###autoload
(defun tmr-reschedule (timer)
"Reschedule TIMER.
This is the same as cloning it, prompting for duration and
@@ -294,7 +291,6 @@ cancelling the original one."
(let (tmr-timer-cancelled-functions)
(tmr-cancel timer)))
-;;;###autoload
(defun tmr-edit-description (timer description)
"Change TIMER description with that of DESCRIPTION."
(interactive
@@ -304,7 +300,6 @@ cancelling the original one."
(setf (tmr--timer-description timer) description)
(run-hooks 'tmr--update-hook))
-;;;###autoload
(defun tmr-toggle-acknowledge (timer)
"Toggle ackowledge flag of TIMER."
(interactive
@@ -313,7 +308,6 @@ cancelling the original one."
(setf (tmr--timer-acknowledgep timer) (not (tmr--timer-acknowledgep timer)))
(run-hooks 'tmr--update-hook))
-;;;###autoload
(defun tmr-remove-finished ()
"Remove all finished timers."
(interactive)
@@ -549,7 +543,6 @@ user uses a prefix argument (\\[universal-argument])."
'tmr-with-details
"0.4.0")
-;;;###autoload
(defun tmr-clone (timer &optional prompt)
"Create a new timer by cloning TIMER.
With optional PROMPT, such as a prefix argument, ask for
