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:
parent
d79dfd472e
commit
754bd273b7
1 changed files with 11 additions and 1 deletions
|
|
@ -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
|
||||
;;; **********************************************************************
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue