mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-12 02:40:34 -08:00
Code Issues Projects Releases Wiki Activity

(flyspell-auto-correct-previous-word): Use window-start and

Browse source 
window-end.
This commit is contained in:
Chong Yidong 2007-04-27 18:53:31 +00:00
parent 752d8efb27
commit 30133f6dcc
1 changed files with 2 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/textmodes/flyspell.el
View file

@ -1961,12 +1961,8 @@ Sets `flyspell-auto-correct-previous-pos' to nil"
But don't look beyond what's visible on the screen."
(interactive "d")
(let (top bot)
(save-excursion
(move-to-window-line 0)
(setq top (point))
(move-to-window-line -1)
(setq bot (point)))
(let ((top (window-start))
(bot (window-end)))
(save-excursion
(save-restriction
(narrow-to-region top bot)