changeset 99217:967ef6e9e7a8

(ispell-word): Use use-region-p.
author Chong Yidong <cyd@stupidchicken.com>
date Wed, 29 Oct 2008 15:51:12 +0000
parents 6969f5202385
children 3a217e6ccfcc
files lisp/textmodes/ispell.el
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/ispell.el	Wed Oct 29 15:50:39 2008 +0000
+++ b/lisp/textmodes/ispell.el	Wed Oct 29 15:51:12 2008 +0000
@@ -1568,8 +1568,7 @@
 quit          spell session exited."
   (interactive (list ispell-following-word ispell-quietly current-prefix-arg t))
   (cond
-   ((and region transient-mark-mode mark-active
-	 (not (eq (region-beginning) (region-end))))
+   ((and region (use-region-p))
     (ispell-region (region-beginning) (region-end)))
    (continue (ispell-continue))
    (t