mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-23 21:37:34 +00:00
(spell-buffer, spell-word): Suppress compiler warnings about
spell-region.
This commit is contained in:
parent
f62e3e0a29
commit
5693f325af
1 changed files with 6 additions and 2 deletions
|
|
@ -61,7 +61,9 @@ and then put into a query-replace to fix some or all occurrences.
|
|||
If you do not want to change a word, just give the same word
|
||||
as its \"correct\" spelling; then the query replace is skipped."
|
||||
(interactive)
|
||||
(spell-region (point-min) (point-max) "buffer"))
|
||||
;; Don't warn about spell-region being obsolete.
|
||||
(with-no-warnings
|
||||
(spell-region (point-min) (point-max) "buffer")))
|
||||
;;;###autoload
|
||||
(make-obsolete 'spell-buffer 'ispell-buffer "23.1")
|
||||
|
||||
|
|
@ -78,7 +80,9 @@ and `query-replace' the entire buffer to substitute it."
|
|||
(setq beg (point))
|
||||
(forward-word 1)
|
||||
(setq end (point)))
|
||||
(spell-region beg end (buffer-substring beg end))))
|
||||
;; Don't warn about spell-region being obsolete.
|
||||
(with-no-warnings
|
||||
(spell-region beg end (buffer-substring beg end)))))
|
||||
;;;###autoload
|
||||
(make-obsolete 'spell-word 'ispell-word "23.1")
|
||||
|
||||
|
|
|
|||
Loading…
Reference in a new issue