diff options
author | Stefan Kangas <stefankangas@gmail.com> | 2023-08-08 04:53:08 +0200 |
---|---|---|
committer | Stefan Kangas <stefankangas@gmail.com> | 2023-08-08 04:53:08 +0200 |
commit | a579739e2b3f3c7218b14a7e41b78e7ddbded06c (patch) | |
tree | 7082f5cc920bed7e1843f08a4de44961eef66e8a /lisp/tooltip.el | |
parent | 301e6a747acc31f9bcc5b7c2429dbcfa806d48f5 (diff) | |
download | emacs-a579739e2b3f3c7218b14a7e41b78e7ddbded06c.tar.gz emacs-a579739e2b3f3c7218b14a7e41b78e7ddbded06c.tar.bz2 emacs-a579739e2b3f3c7218b14a7e41b78e7ddbded06c.zip |
Make XEmacs compat aliases for timers obsolete
* lisp/emacs-lisp/timer.el (disable-timeout, add-timeout): Make
XEmacs compat aliases obsolete. Update all callers.
Diffstat (limited to 'lisp/tooltip.el')
-rw-r--r-- | lisp/tooltip.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/tooltip.el b/lisp/tooltip.el index 8d92caed08e..0881a7c7bf9 100644 --- a/lisp/tooltip.el +++ b/lisp/tooltip.el @@ -194,13 +194,13 @@ This might return nil if the event did not occur over a buffer." (defun tooltip-cancel-delayed-tip () "Disable the tooltip timeout." (when tooltip-timeout-id - (disable-timeout tooltip-timeout-id) + (cancel-timer tooltip-timeout-id) (setq tooltip-timeout-id nil))) (defun tooltip-start-delayed-tip () "Add a one-shot timeout to call function `tooltip-timeout'." (setq tooltip-timeout-id - (add-timeout (tooltip-delay) 'tooltip-timeout nil))) + (run-with-timer (tooltip-delay) 'tooltip-timeout nil))) (defun tooltip-timeout (_object) "Function called when timer with id `tooltip-timeout-id' fires." |