(vhdl-run-when-idle): Don't use timer--triggered
* lisp/progmodes/vhdl-mode.el (vhdl-run-when-idle): Avoid relying needlessly on internal accessor and fix last change to make sure we always create a timer.
This commit is contained in:
parent
bf0aeaa0d7
commit
44c9c2c845
1 changed files with 5 additions and 3 deletions
|
@ -2338,11 +2338,13 @@ Ignore byte-compiler warnings you might see."
|
|||
|
||||
(defun vhdl-run-when-idle (secs repeat function)
|
||||
"Wait until idle, then run FUNCTION."
|
||||
(if (fboundp 'start-itimer)
|
||||
(if (fboundp 'start-itimer) ;;XEmacs
|
||||
(start-itimer "vhdl-mode" function secs repeat t)
|
||||
;; explicitly activate timer (necessary when Emacs is already idle)
|
||||
(when (featurep 'xemacs)
|
||||
(aset (run-with-idle-timer secs repeat function) 0 nil))))
|
||||
(let ((timer (run-with-idle-timer secs repeat function)))
|
||||
;; `run-with-idle-timer' already sets the `triggered' flag to nil,
|
||||
;; at least since Emacs-24.
|
||||
(if (< emacs-major-version 24) (aset timer 0 nil)))))
|
||||
|
||||
(defun vhdl-warning-when-idle (&rest args)
|
||||
"Wait until idle, then print out warning STRING and beep."
|
||||
|
|
Loading…
Add table
Reference in a new issue