emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/textmodes/spell.el,v


From: Glenn Morris
Subject: [Emacs-diffs] Changes to emacs/lisp/textmodes/spell.el,v
Date: Thu, 21 Feb 2008 09:00:51 +0000

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       08/02/21 09:00:51

Index: spell.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/textmodes/spell.el,v
retrieving revision 1.26
retrieving revision 1.27
diff -u -b -r1.26 -r1.27
--- spell.el    8 Jan 2008 20:45:40 -0000       1.26
+++ spell.el    21 Feb 2008 09:00:51 -0000      1.27
@@ -62,6 +62,8 @@
 as its \"correct\" spelling; then the query replace is skipped."
   (interactive)
   (spell-region (point-min) (point-max) "buffer"))
+;;;###autoload
+(make-obsolete 'spell-buffer 'ispell-buffer "23.1")
 
 ;;;###autoload
 (defun spell-word ()
@@ -77,6 +79,8 @@
      (forward-word 1)
      (setq end (point)))
     (spell-region beg end (buffer-substring beg end))))
+;;;###autoload
+(make-obsolete 'spell-word 'ispell-word "23.1")
 
 ;;;###autoload
 (defun spell-region (start end &optional description)
@@ -138,7 +142,8 @@
             (goto-char (point-min))
             (query-replace-regexp (concat "\\b" (regexp-quote word) "\\b")
                                   newword)))))))
-
+;;;###autoload
+(make-obsolete 'spell-region 'ispell-region "23.1")
 
 ;;;###autoload
 (defun spell-string (string)
@@ -161,6 +166,9 @@
        (while (search-forward "\n" nil t)
         (replace-match " "))
        (message "%sincorrect" (buffer-substring 1 (point-max)))))))
+;;;###autoload
+(make-obsolete 'spell-string "The `spell' package is obsolete - use `ispell'."
+               "23.1")
 
 (provide 'spell)
 




reply via email to

[Prev in Thread] Current Thread [Next in Thread]