Fix autoload cookies.

5 files changed, 19 insertions, 14 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3fc5d2bdf94..507640f684c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2001-04-23  Gerd Moellmann  <gerd@gnu.org>
+
+	* textmodes/ispell.el, emacs-lisp/checkdoc.el,
+	* progmodes/ebrowse.el, play/fortune.el: Fix autoload cookies.
+
 2001-04-23  Alex Schroeder  <alex@gnu.org>
 
 	* goto-addr.el: Instead of defining line-beginning-position and
diff --git a/lisp/emacs-lisp/checkdoc.el b/lisp/emacs-lisp/checkdoc.el
index a2bca2a9b47..5bc22cc19de 100644
--- a/lisp/emacs-lisp/checkdoc.el
+++ b/lisp/emacs-lisp/checkdoc.el
@@ -899,7 +899,7 @@ Return nil if there are no more doc strings."
     (skip-chars-forward " \n\t")
     t))
 
-;;; ###autoload
+;;;###autoload
 (defun checkdoc-comments (&optional take-notes)
   "Find missing comment sections in the current Emacs Lisp file.
 Prefix argument TAKE-NOTES non-nil means to save warnings in a
diff --git a/lisp/play/fortune.el b/lisp/play/fortune.el
index c3e94eaaa37..0ae1a841f43 100644
--- a/lisp/play/fortune.el
+++ b/lisp/play/fortune.el
@@ -1,5 +1,5 @@
 ;;; fortune.el --- Use fortune to create signatures
-;; Copyright (C) 1999 Free Software Foundation, Inc.
+;; Copyright (C) 1999, 2001 Free Software Foundation, Inc.
 
 ;; Author: Holger Schauer <Holger.Schauer@gmx.de>
 ;; Keywords: games utils mail
@@ -160,7 +160,7 @@ If INTERACTIVE is non-nil, don't compile the fortune file afterwards."
     "Fortune file to use: "
     fortune-dir nil nil "")))
 
-;;; ###autoload
+;;;###autoload
 (defun fortune-add-fortune (string file)
   "Add STRING to a fortune file FILE.
 
@@ -171,7 +171,7 @@ read the file name to use.  Otherwise use the value of `fortune-file'."
 	 (if current-prefix-arg (fortune-ask-file))))
   (fortune-append string t file))
 
-;;; ###autoload
+;;;###autoload
 (defun fortune-from-region (beg end file)
   "Append the current region to a local fortune-like data file.
 
@@ -217,7 +217,7 @@ read the file name to use.  Otherwise use the value of `fortune-file'."
 
 ;;; **************
 ;;; Compile new database with strfile
-;;; ###autoload
+;;;###autoload
 (defun fortune-compile (&optional file)
   "Compile fortune file.
 
@@ -244,7 +244,7 @@ the value of `fortune-file'.  This currently cannot handle directories."
 	 
 ;;; **************
 ;;; Use fortune for signature
-;;; ###autoload
+;;;###autoload
 (defun fortune-to-signature (&optional file)
   "Create signature from output of the fortune program.
 
@@ -293,7 +293,7 @@ when supplied, specifies the file to choose the fortune from."
 	(concat fortune-program-options fort-file)))))
 
 
-;;; ###autoload
+;;;###autoload
 (defun fortune (&optional file)
   "Display a fortune cookie.
 
diff --git a/lisp/progmodes/ebrowse.el b/lisp/progmodes/ebrowse.el
index e767bfd831d..4b62a90e115 100644
--- a/lisp/progmodes/ebrowse.el
+++ b/lisp/progmodes/ebrowse.el
@@ -3822,7 +3822,7 @@ With prefix arg, process files of marked classes only."
   (ebrowse-tags-loop-continue 'first-time))
 
 
-;;; ###autoload
+;;;###autoload
 (defun ebrowse-tags-search-member-use (&optional fix-name)
   "Search for call sites of a member.
 If FIX-NAME is specified, search uses of that member.
@@ -3926,7 +3926,7 @@ Positions in buffers that have no file names are not saved."
 				     ebrowse-position-stack))))
 
 
-;;; ###autoload
+;;;###autoload
 (defun ebrowse-back-in-position-stack (arg)
   "Move backward in the position stack.
 Prefix arg ARG says how much."
@@ -3934,7 +3934,7 @@ Prefix arg ARG says how much."
   (ebrowse-move-in-position-stack (max 1 arg)))
 
 
-;;; ###autoload
+;;;###autoload
 (defun ebrowse-forward-in-position-stack (arg)
   "Move forward in the position stack.
 Prefix arg ARG says how much."
@@ -4019,7 +4019,7 @@ Runs the hook `ebrowse-electric-position-mode-hook'."
   (setq buffer-read-only t))
 
 
-;;; ###autoload
+;;;###autoload
 (defun ebrowse-electric-position-menu ()
   "List positions in the position stack in an electric buffer."
   (interactive)
@@ -4121,7 +4121,7 @@ Installed on `local-write-file-hooks'."
   t)
 
 
-;;; ###autoload
+;;;###autoload
 (defun ebrowse-save-tree ()
   "Save current tree in same file it was loaded from."
   (interactive)
@@ -4172,7 +4172,7 @@ Otherwise, FILE-NAME specifies the file to save the tree in."
 
 ;;; Statistics
 
-;;; ###autoload
+;;;###autoload
 (defun ebrowse-statistics ()
   "Display statistics for a class tree."
   (interactive)
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index eda0c7d07cc..e8d872027db 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -1477,7 +1477,7 @@ Word syntax described by `ispell-dictionary-alist' (which see)."
 ;;; a value or a list, whose value is the state of whether the
 ;;; dictionary needs to be saved.
 
-;;; ###autoload
+;;;###autoload
 (defun ispell-pdict-save (&optional no-query force-save)
   "Check to see if the personal dictionary has been modified.
 If so, ask if it needs to be saved."