branch: externals/consult
commit 1a40cc6b426d101845bbd35572c5a55500c1a902
Author: Daniel Mendler <m...@daniel-mendler.de>
Commit: Daniel Mendler <m...@daniel-mendler.de>

    Prefer run-at-time
---
 consult-register.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/consult-register.el b/consult-register.el
index edbc2f0..4319431 100644
--- a/consult-register.el
+++ b/consult-register.el
@@ -200,7 +200,7 @@ This function is derived from `register-read-with-preview'."
                       action-list "  "))
                     (fit-window-to-buffer)))))))
         (timer (when (numberp register-preview-delay)
-                 (run-with-timer register-preview-delay nil preview)))
+                 (run-at-time register-preview-delay nil preview)))
         (help-chars (seq-remove #'get-register (cons help-char 
help-event-list))))
     (unwind-protect
         (while (not reg)

Reply via email to