*** empty log message ***

lisp/indent.el

@@ -18,8 +18,9 @@
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
 
-;;;###autoload (defvar indent-line-function 'indent-to-left-margin "\
-;;;###autoload Function to indent current line.");Now in loaddefs.el
+;;;###autoload
+(defvar indent-line-function 'indent-to-left-margin "\
+Function to indent current line.");Now in loaddefs.el
 
 (defun indent-according-to-mode ()
   "Indent line in proper way for current major mode."

lisp/ledit.el

@@ -33,12 +33,15 @@
 (defconst ledit-buffer "*LEDIT*"
   "Name of buffer in which Ledit accumulates data to send to Lisp.")
 
-;;;###autoload (defconst ledit-save-files t
-;;;###autoload   "*Non-nil means Ledit should save files before transferring to Lisp.")
-;;;###autoload (defconst ledit-go-to-lisp-string "%?lisp"
-;;;###autoload   "*Shell commands to execute to resume Lisp job.")
-;;;###autoload (defconst ledit-go-to-liszt-string "%?liszt"
-;;;###autoload   "*Shell commands to execute to resume Lisp compiler job.")
+;;;###autoload
+(defconst ledit-save-files t "\
+*Non-nil means Ledit should save files before transferring to Lisp.")
+;;;###autoload
+(defconst ledit-go-to-lisp-string "%?lisp" "\
+*Shell commands to execute to resume Lisp job.")
+;;;###autoload
+(defconst ledit-go-to-liszt-string "%?liszt" "\
+*Shell commands to execute to resume Lisp compiler job.")
 
 (defun ledit-save-defun ()
   "Save the current defun in the ledit buffer"

lisp/lpr.el

@@ -18,8 +18,9 @@
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
 
-;;;###autoload (defconst lpr-switches nil
-;;;###autoload   "*List of strings to pass as extra switch args to lpr when it is invoked.")
+;;;###autoload
+(defconst lpr-switches nil "\
+*List of strings to pass as extra switch args to lpr when it is invoked.")
 
 (defvar lpr-command (if (eq system-type 'usg-unix-v)
 			"lp" "lpr")

lisp/reposition.el

@@ -161,7 +161,8 @@ first comment line visible (if point is in a comment)."
 	   ;;(repos-debug-macro "4")
 	   ))))
 
-;;;###autoload (define-key esc-map "\C-l" 'resposition-window)
+;;;###autoload
+(define-key esc-map "\C-l" 'resposition-window)
 
 ;;; Auxiliary functions
 

lisp/textmodes/paragraphs.el

@@ -18,23 +18,28 @@
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
 
-;;;###autoload (defconst paragraph-start "^[ \t\n\f]"
-;;;###autoload   "*Regexp for beginning of a line that starts OR separates paragraphs.")
+;;;###autoload
+(defconst paragraph-start "^[ \t\n\f]" "\
+*Regexp for beginning of a line that starts OR separates paragraphs.")
 
-;;;###autoload (defconst paragraph-separate "^[ \t\f]*$"
-;;;###autoload   "*Regexp for beginning of a line that separates paragraphs.
-;;;###autoload If you change this, you may have to change paragraph-start also.")
+;;;###autoload
+(defconst paragraph-separate "^[ \t\f]*$" "\
+*Regexp for beginning of a line that separates paragraphs.
+If you change this, you may have to change paragraph-start also.")
 
-;;;###autoload (defconst sentence-end   (purecopy "[.?!][]\"')}]*\\($\\| $\\|\t\\|  \\)[ \t\n]*") "\
-;;;###autoload *Regexp describing the end of a sentence.
-;;;###autoload All paragraph boundaries also end sentences, regardless.")
+;;;###autoload
+(defconst sentence-end (purecopy "[.?!][]\"')}]*\\($\\| $\\|\t\\|  \\)[ \t\n]*") "\
+*Regexp describing the end of a sentence.
+All paragraph boundaries also end sentences, regardless.")
 
-;;;###autoload (defconst page-delimiter "^\014" "\
-;;;###autoload *Regexp describing line-beginnings that separate pages.")
+;;;###autoload
+(defconst page-delimiter "^\014" "\
+*Regexp describing line-beginnings that separate pages.")
 
-;;;###autoload (defvar paragraph-ignore-fill-prefix nil
-;;;###autoload   "Non-nil means the paragraph commands are not affected by `fill-prefix'.
-;;;###autoload This is desirable in modes where blank lines are the paragraph delimiters.")
+;;;###autoload
+(defvar paragraph-ignore-fill-prefix nil "\
+Non-nil means the paragraph commands are not affected by `fill-prefix'.
+This is desirable in modes where blank lines are the paragraph delimiters.")
 
 
 (defun forward-paragraph (&optional arg)

lisp/textmodes/picture.el

@@ -533,7 +533,8 @@ they are not defaultly assigned to keys."
       "Type \\[picture-mode-exit] in this buffer to return it to %s mode.")
      picture-mode-old-mode-name)))
 
-;;;###autoload (fset 'picture-mode 'edit-picture)
+;;;###autoload
+(fset 'picture-mode 'edit-picture)
 
 (defun picture-mode-exit (&optional nostrip)
   "Undo edit-picture and return to previous major mode.

lisp/textmodes/tex-mode.el

@@ -165,8 +165,10 @@ is used."
 		       'plain-tex-mode))))
     (if mode (funcall mode)
       (funcall tex-default-mode))))
-;;;###autoload (fset 'TeX-mode 'tex-mode)
-;;;###autoload (fset 'LaTeX-mode 'latex-mode)
+;;;###autoload
+(fset 'TeX-mode 'tex-mode)
+;;;###autoload
+(fset 'LaTeX-mode 'latex-mode)
 
 ;;;###autoload
 (defun plain-tex-mode ()
@@ -215,7 +217,8 @@ subshell is initiated, the value of tex-shell-hook is called."
   (setq tex-end-of-header "%**end of header")
   (setq tex-trailer "\\bye\n")
   (run-hooks 'text-mode-hook 'tex-mode-hook 'plain-tex-mode-hook))
-;;;###autoload (fset 'plain-TeX-mode 'plain-tex-mode)
+;;;###autoload
+(fset 'plain-TeX-mode 'plain-tex-mode)
 
 ;;;###autoload
 (defun latex-mode ()