procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Avoid overly short timeout in ispell-help

Browse source 
* lisp/textmodes/ispell.el (ispell-help): Avoid too short timeout by
using at least 0.5 seconds.
This commit is contained in:
Stefan Kangas 2025-02-04 02:53:53 +01:00
parent 782ec71053
commit 7d85f678f3
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/textmodes/ispell.el
View file

@ -2512,7 +2512,7 @@ Selections are:
(with-current-buffer buffer
(insert (concat help-1 "\n" help-2 "\n" help-3)))
(ispell-display-buffer buffer)
(sit-for ispell-help-timeout)
(sit-for (max 0.5 ispell-help-timeout))
(kill-buffer "*Ispell Help*"))
(unwind-protect
(let ((resize-mini-windows 'grow-only))
@ -2522,7 +2522,7 @@ Selections are:
;;(set-minibuffer-window (selected-window))
(enlarge-window 2)
(insert (concat help-1 "\n" help-2 "\n" help-3))
(sit-for ispell-help-timeout))
(sit-for (max 0.5 ispell-help-timeout)))
(erase-buffer)))))))
(define-obsolete-function-alias 'lookup-words 'ispell-lookup-words "24.4")