aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1995-05-06 01:52:22 +0000
committerRichard M. Stallman1995-05-06 01:52:22 +0000
commit3595955ca6959a2f0e13dec843af7857b45a6eb3 (patch)
tree32bb63410b235dc15616b8a53d68a7bf46dd7bd9
parent869d4256c80bcc92176ad9255503709868c45b0e (diff)
downloademacs-3595955ca6959a2f0e13dec843af7857b45a6eb3.tar.gz
emacs-3595955ca6959a2f0e13dec843af7857b45a6eb3.zip
All autoload cookies disabled.
-rw-r--r--lisp/textmodes/ispell4.el16
-rw-r--r--lisp/textmodes/outline.el6
2 files changed, 11 insertions, 11 deletions
diff --git a/lisp/textmodes/ispell4.el b/lisp/textmodes/ispell4.el
index 3e87b7c7322..6a06a3be6f1 100644
--- a/lisp/textmodes/ispell4.el
+++ b/lisp/textmodes/ispell4.el
@@ -243,7 +243,7 @@ that have not already been dumped will be lost."
243(define-key ispell-menu-map [ispell-buffer] 243(define-key ispell-menu-map [ispell-buffer]
244 '("Check Buffer" . ispell)) 244 '("Check Buffer" . ispell))
245 245
246;;;###autoload 246;;;autoload
247(defun ispell (&optional buf start end) 247(defun ispell (&optional buf start end)
248 "Run Ispell over current buffer's visited file. 248 "Run Ispell over current buffer's visited file.
249First the file is scanned for misspelled words, then Ispell 249First the file is scanned for misspelled words, then Ispell
@@ -320,7 +320,7 @@ q, \\[keyboard-quit] Leave the command loop. You can come back later with \\[is
320 (message "Ispell parsing done.") 320 (message "Ispell parsing done.")
321 (ispell-next)))) 321 (ispell-next))))
322 322
323;;;###autoload 323;;;autoload
324(defalias 'ispell-buffer 'ispell) 324(defalias 'ispell-buffer 'ispell)
325 325
326(defun ispell-next () 326(defun ispell-next ()
@@ -361,7 +361,7 @@ Return value is t unless exit is due to typing `q'."
361 (message "Bad ispell internal list")))) 361 (message "Bad ispell internal list"))))
362 (ispell-dump))) 362 (ispell-dump)))
363 363
364;;;###autoload 364;;;autoload
365(defun ispell-word (&optional resume) 365(defun ispell-word (&optional resume)
366 "Check the spelling of the word under the cursor. 366 "Check the spelling of the word under the cursor.
367See the command `ispell' for more information. 367See the command `ispell' for more information.
@@ -382,9 +382,9 @@ With a prefix argument, resume handling of the previous Ispell command."
382 (define-key esc-map "$" 'spell-word) 382 (define-key esc-map "$" 'spell-word)
383 (spell-word))))))) 383 (spell-word)))))))
384 384
385;;;###autoload (define-key esc-map "$" 'ispell-word) 385;;;autoload (define-key esc-map "$" 'ispell-word)
386 386
387;;;###autoload 387;;;autoload
388(defun ispell-region (start &optional end) 388(defun ispell-region (start &optional end)
389 "Check the spelling for all of the words in the region." 389 "Check the spelling for all of the words in the region."
390 (interactive "r") 390 (interactive "r")
@@ -793,7 +793,7 @@ will help find those completions.")
793(put 'ispell-lookup-last-bow 'permanent-local t) 793(put 'ispell-lookup-last-bow 'permanent-local t)
794 794
795;;;; Interactive functions. 795;;;; Interactive functions.
796;;;###autoload 796;;;autoload
797(defun ispell-complete-word (&optional interior-frag) 797(defun ispell-complete-word (&optional interior-frag)
798 "Complete word using letters at point to word beginning using `look'. 798 "Complete word using letters at point to word beginning using `look'.
799With optional argument INTERIOR-FRAG, word fragment at point is assumed to be 799With optional argument INTERIOR-FRAG, word fragment at point is assumed to be
@@ -902,7 +902,7 @@ See also `ispell-look-dictionary' and `ispell-gnu-look-still-broken-p'."
902 (display-completion-list list))) 902 (display-completion-list list)))
903 (message "Making completion list...done"))))) 903 (message "Making completion list...done")))))
904 904
905;;;###autoload 905;;;autoload
906(defun ispell-complete-word-interior-frag () 906(defun ispell-complete-word-interior-frag ()
907 "Runs `ispell-complete-word' with a non-nil INTERIOR-FRAG. 907 "Runs `ispell-complete-word' with a non-nil INTERIOR-FRAG.
908A completion list is built for word fragment at point which is assumed to be 908A completion list is built for word fragment at point which is assumed to be
@@ -982,7 +982,7 @@ Otherwise, it must be a function which is called to get the limit.")
982(defvar ispell-message-limit (* 100 80) 982(defvar ispell-message-limit (* 100 80)
983 "*Ispell-message will check no more than this number of characters.") 983 "*Ispell-message will check no more than this number of characters.")
984 984
985;;;###autoload 985;;;autoload
986(defun ispell-message () 986(defun ispell-message ()
987 "Check the spelling of a mail message or news post. 987 "Check the spelling of a mail message or news post.
988Don't check spelling of message headers (except subject) or included messages. 988Don't check spelling of message headers (except subject) or included messages.
diff --git a/lisp/textmodes/outline.el b/lisp/textmodes/outline.el
index 2b5256b91f8..d05dff58d10 100644
--- a/lisp/textmodes/outline.el
+++ b/lisp/textmodes/outline.el
@@ -1,5 +1,5 @@
1;;; outline.el --- outline mode commands for Emacs 1;;; outline.el --- outline mode commands for Emacs
2;; Copyright (C) 1986, 1993, 1994 Free Software Foundation, Inc. 2;; Copyright (C) 1986, 1993, 1994, 1995 Free Software Foundation, Inc.
3 3
4;; Maintainer: FSF 4;; Maintainer: FSF
5;; Keywords: outlines 5;; Keywords: outlines
@@ -149,7 +149,7 @@ in the file it applies to.")
149 ("\\[\\([A-Z][A-Za-z]+\\)*[0-9]+\\]" . font-lock-type-face)) 149 ("\\[\\([A-Z][A-Za-z]+\\)*[0-9]+\\]" . font-lock-type-face))
150 "Additional expressions to highlight in Outline mode.") 150 "Additional expressions to highlight in Outline mode.")
151 151
152;;;###autoload 152;;;autoload
153(defun outline-mode () 153(defun outline-mode ()
154 "Set major mode for editing outlines with selective display. 154 "Set major mode for editing outlines with selective display.
155Headings are lines which start with asterisks: one for major headings, 155Headings are lines which start with asterisks: one for major headings,
@@ -235,7 +235,7 @@ After that, changing the prefix key requires manipulating keymaps.")
235 (cons (cons 'outline-minor-mode outline-minor-mode-map) 235 (cons (cons 'outline-minor-mode outline-minor-mode-map)
236 minor-mode-map-alist))) 236 minor-mode-map-alist)))
237 237
238;;;###autoload 238;;;autoload
239(defun outline-minor-mode (&optional arg) 239(defun outline-minor-mode (&optional arg)
240 "Toggle Outline minor mode. 240 "Toggle Outline minor mode.
241With arg, turn Outline minor mode on if arg is positive, off otherwise. 241With arg, turn Outline minor mode on if arg is positive, off otherwise.