changeset 77581:460403d9f673

(flyspell-auto-correct-previous-word): Use window-start and window-end.
author Chong Yidong <cyd@stupidchicken.com>
date Fri, 27 Apr 2007 18:53:31 +0000
parents 24101cde7185
children 92612b77c111
files lisp/textmodes/flyspell.el
diffstat 1 files changed, 2 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/flyspell.el	Fri Apr 27 18:53:22 2007 +0000
+++ b/lisp/textmodes/flyspell.el	Fri Apr 27 18:53:31 2007 +0000
@@ -1961,12 +1961,8 @@
 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)