1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-27 08:43:40 -07:00

Remove some XEmacs compat code from ispell.el

* lisp/textmodes/ispell.el (ispell-word): Remove XEmacs compat code.
This commit is contained in:
Lars Ingebrigtsen 2019-10-04 15:24:42 +02:00
parent b0ef37758e
commit 33702988d9

View file

@ -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