summaryrefslogtreecommitdiff
path: root/src/gizmo/wasp-alert-message.el
diff options
context:
space:
mode:
authorLLLL Colonq <llll@colonq>2025-11-07 00:20:02 -0500
committerLLLL Colonq <llll@colonq>2025-11-07 00:20:02 -0500
commitcf266a56f30daae8b9af7c9bc3267c61b1973192 (patch)
treef365939f712973840ff19d9265c552af820cd1ef /src/gizmo/wasp-alert-message.el
parent3d31c488fb06e9937964041f4d83d0cb1c9699ab (diff)
Update
Diffstat (limited to 'src/gizmo/wasp-alert-message.el')
-rw-r--r--src/gizmo/wasp-alert-message.el17
1 files changed, 4 insertions, 13 deletions
diff --git a/src/gizmo/wasp-alert-message.el b/src/gizmo/wasp-alert-message.el
index c645b01f..da5f214f 100644
--- a/src/gizmo/wasp-alert-message.el
+++ b/src/gizmo/wasp-alert-message.el
@@ -27,30 +27,21 @@
:group 'w
(setq-local cursor-type nil))
-(defun w/get-alert-message-buffer ()
+(defun w/alert-message-get-buffer ()
"Return the alert message buffer."
(unless (get-buffer w/alert-message-buffer)
(with-current-buffer (get-buffer-create w/alert-message-buffer)
(w/alert-message-mode)))
(get-buffer w/alert-message-buffer))
-(defun w/render-alert-message ()
+(defun w/alert-message-update ()
"Render the heartrate buffer."
- (with-current-buffer (w/get-alert-message-buffer)
+ (with-current-buffer (w/alert-message-get-buffer)
(setq-local cursor-type nil)
(let* ((inhibit-read-only t))
(erase-buffer)
(w/write (w/pick-random w/alert-message-phrases)))))
-
-(defvar w/alert-message-timer nil)
-(defun w/run-alert-message-timer ()
- "Run the alert message timer."
- (when w/alert-message-timer
- (cancel-timer w/alert-message-timer))
- (w/render-alert-message)
- (setq
- w/alert-message-timer
- (run-with-timer 10 nil #'w/run-alert-message-timer)))
+(add-hook 'w/gizmo-update-hook #'w/alert-message-update)
(provide 'wasp-alert-message)
;;; wasp-alert-message.el ends here