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

window-end.
2007-04-27 18:53:31 +00:00
parent 752d8efb27
commit 30133f6dcc
1 changed files with 2 additions and 6 deletions
--- a/lisp/textmodes/flyspell.el
+++ b/lisp/textmodes/flyspell.el
@@ -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)