Mercurial > emacs
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