From: Chong Yidong <cyd@stupidchicken.com>
Date: Fri, 27 Apr 2007 18:56:26 +0000 (+0000)
Subject: (flyspell-auto-correct-previous-word): Use window-start and
X-Git-Tag: emacs-pretest-23.0.90~12777
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=229d40d887dc87c5a3a54453af60796a5b5bbcd3;p=emacs.git

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

diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el
index 185f2e8dea3..a509fdf7f6c 100644
--- 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)