1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

(ispell): New function, replacing an alias.

Spell-check active region if in transient-mark-mode and mark
is active; otherwise spell-check buffer.
This commit is contained in:
Gerd Moellmann 2000-08-02 20:21:53 +00:00
parent d79dfd472e
commit 754bd273b7

View file

@ -206,7 +206,6 @@
(and (not version18p)
(not (boundp 'epoch::version))
(defalias 'ispell 'ispell-buffer)
(defalias 'ispell-check-version 'check-ispell-version))
@ -2806,6 +2805,17 @@ Standard ispell choices are then available."
(ispell-complete-word t))
;;;###autoload
(defun ispell ()
"Interactively check a region or buffer for spelling errors.
If `transient-mark-mode' is on, an a region is active, spell-check
that region. Otherwise spell-check the buffer."
(interactive)
(if (and transient-mark-mode mark-active)
(ispell-region (region-beginning) (region-end))
(ispell-buffer)))
;;; **********************************************************************
;;; Ispell Minor Mode
;;; **********************************************************************