From 33702988d9b0ff7ba816bf3a78cfd2586e16744e Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Fri, 4 Oct 2019 15:24:42 +0200 Subject: [PATCH] Remove some XEmacs compat code from ispell.el * lisp/textmodes/ispell.el (ispell-word): Remove XEmacs compat code. --- lisp/textmodes/ispell.el | 7 +------ 1 file changed, 1 insertion(+), 6 deletions(-) diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index 5c77e03b0b2..c1b21fdd2eb 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el @@ -1932,12 +1932,7 @@ nil word is correct or spelling is accepted. quit spell session exited." (interactive (list ispell-following-word ispell-quietly current-prefix-arg t)) (cond - ((and region - (if (featurep 'emacs) - (use-region-p) - (and (boundp 'transient-mark-mode) transient-mark-mode - (boundp 'mark-active) mark-active - (not (eq (region-beginning) (region-end)))))) + ((and region (use-region-p)) (ispell-region (region-beginning) (region-end))) (continue (ispell-continue)) (t -- 2.39.2