diff lisp/textmodes/=ispell4.el @ 11713:5306e71f486c

All autoload cookies disabled.
author Richard M. Stallman <rms@gnu.org>
date Sat, 06 May 1995 01:52:22 +0000
parents 33a3f424c8c3
children 1514fd54b2f5
line wrap: on
line diff
--- a/lisp/textmodes/=ispell4.el	Sat May 06 01:45:50 1995 +0000
+++ b/lisp/textmodes/=ispell4.el	Sat May 06 01:52:22 1995 +0000
@@ -243,7 +243,7 @@
 (define-key ispell-menu-map [ispell-buffer]
   '("Check Buffer" . ispell))
 
-;;;###autoload
+;;;autoload
 (defun ispell (&optional buf start end)
   "Run Ispell over current buffer's visited file.
 First the file is scanned for misspelled words, then Ispell
@@ -320,7 +320,7 @@
 	 (message "Ispell parsing done.")
 	 (ispell-next))))
 
-;;;###autoload
+;;;autoload
 (defalias 'ispell-buffer 'ispell)
 
 (defun ispell-next ()
@@ -361,7 +361,7 @@
 	       (message "Bad ispell internal list"))))
     (ispell-dump)))
 
-;;;###autoload
+;;;autoload
 (defun ispell-word (&optional resume)
   "Check the spelling of the word under the cursor.
 See the command `ispell' for more information.
@@ -382,9 +382,9 @@
 	      (define-key esc-map "$" 'spell-word)
 	      (spell-word)))))))
 
-;;;###autoload (define-key esc-map "$" 'ispell-word)
+;;;autoload (define-key esc-map "$" 'ispell-word)
 
-;;;###autoload
+;;;autoload
 (defun ispell-region (start &optional end)
   "Check the spelling for all of the words in the region."
   (interactive "r")
@@ -793,7 +793,7 @@
 (put 'ispell-lookup-last-bow 'permanent-local t)
 
 ;;;; Interactive functions.
-;;;###autoload
+;;;autoload
 (defun ispell-complete-word (&optional interior-frag)
   "Complete word using letters at point to word beginning using `look'.
 With optional argument INTERIOR-FRAG, word fragment at point is assumed to be
@@ -902,7 +902,7 @@
           (display-completion-list list)))
       (message "Making completion list...done")))))
 
-;;;###autoload
+;;;autoload
 (defun ispell-complete-word-interior-frag ()
   "Runs `ispell-complete-word' with a non-nil INTERIOR-FRAG.
 A completion list is built for word fragment at point which is assumed to be
@@ -982,7 +982,7 @@
 (defvar ispell-message-limit (* 100 80)
   "*Ispell-message will check no more than this number of characters.")
 
-;;;###autoload
+;;;autoload
 (defun ispell-message ()
   "Check the spelling of a mail message or news post.
 Don't check spelling of message headers (except subject) or included messages.