# HG changeset patch
# User Roland McGrath <roland@gnu.org>
# Date 673912062 0
# Node ID 990d2229354c78faadb78c79103f207b1c69b6c2
# Parent  731afdb0842c9a721f9996cdb7976d73a1708d90
*** empty log message ***

diff -r 731afdb0842c -r 990d2229354c lisp/ledit.el
--- a/lisp/ledit.el	Fri May 10 21:15:23 1991 +0000
+++ b/lisp/ledit.el	Fri May 10 21:47:42 1991 +0000
@@ -33,15 +33,12 @@
 (defconst ledit-buffer "*LEDIT*"
   "Name of buffer in which Ledit accumulates data to send to Lisp.")
 
-;;;###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.")
+;;;###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.")
 
 (defun ledit-save-defun ()
   "Save the current defun in the ledit buffer"
diff -r 731afdb0842c -r 990d2229354c lisp/lpr.el
--- a/lisp/lpr.el	Fri May 10 21:15:23 1991 +0000
+++ b/lisp/lpr.el	Fri May 10 21:47:42 1991 +0000
@@ -18,9 +18,8 @@
 ;; the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 
 
-;;;###autoload
-(defconst lpr-switches nil
-  "*List of strings to pass as extra switch args to lpr when it is invoked.")
+;;;###autoload (defconst lpr-switches nil
+;;;###autoload   "*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")
diff -r 731afdb0842c -r 990d2229354c lisp/mail/mail-utils.el
--- a/lisp/mail/mail-utils.el	Fri May 10 21:15:23 1991 +0000
+++ b/lisp/mail/mail-utils.el	Fri May 10 21:47:42 1991 +0000
@@ -20,11 +20,10 @@
 
 (provide 'mail-utils)
 		     
-;;;###autoload
-(defvar mail-use-rfc822 nil
-  "*If non-nil, use a full, hairy RFC822 parser on mail addresses.
-Otherwise, (the default) use a smaller, somewhat faster, and
-often correct parser.")
+;;;###autoload (defvar mail-use-rfc822 nil
+;;;###autoload   "*If non-nil, use a full, hairy RFC822 parser on mail addresses.
+;;;###autoload Otherwise, (the default) use a smaller, somewhat faster, and
+;;;###autoload often correct parser.")
 
 (defun mail-string-delete (string start end)
   "Returns a string containing all of STRING except the part
diff -r 731afdb0842c -r 990d2229354c lisp/reposition.el
--- a/lisp/reposition.el	Fri May 10 21:15:23 1991 +0000
+++ b/lisp/reposition.el	Fri May 10 21:47:42 1991 +0000
@@ -31,6 +31,7 @@
 ;;; after one of the same name in ZMACS, but the code is all-new and the
 ;;; behavior in some situations differs.
 
+;;;###autoload
 (defun reposition-window (&optional arg)
   "Make the current definition and/or comment visible.
 Further invocations move it to the top of the window or toggle the
diff -r 731afdb0842c -r 990d2229354c lisp/time.el
--- a/lisp/time.el	Fri May 10 21:15:23 1991 +0000
+++ b/lisp/time.el	Fri May 10 21:47:42 1991 +0000
@@ -22,9 +22,8 @@
   "*File name of mail inbox file, for indicating existence of new mail.
 Default is system-dependent, and is the same as used by Rmail.")
 
-;;;###autoload
-(defconst display-time-day-and-date nil "\
-*Non-nil means \\[display-time] should display day and date as well as time.")
+;;;###autoload (defconst display-time-day-and-date nil
+;;;###autoload "*Non-nil means \\[display-time] should display day and date as well as time.")
 
 (defvar display-time-process nil)