# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1225295472 0
# Node ID 967ef6e9e7a86ac56148cec2020a0b28b7bff8a2
# Parent  6969f5202385eb210a9880b60e9cd1ee2f237c97
(ispell-word): Use use-region-p.

diff -r 6969f5202385 -r 967ef6e9e7a8 lisp/textmodes/ispell.el
--- 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