From: Richard M. Stallman <rms@gnu.org>
Date: Tue, 16 Nov 1993 06:15:33 +0000 (+0000)
Subject: (change-log-default-name, add-log-current-defun-function)
X-Git-Tag: emacs-19.34~10813
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=75ade4691a2d5f096b73371659a34ffe097d86d8;p=emacs.git

(change-log-default-name, add-log-current-defun-function)
(add-log-full-name, add-log-mailing-address): Delete autoload cookies.
---

diff --git a/lisp/add-log.el b/lisp/add-log.el
index 8f06aacd163..ffc1494f85c 100644
--- a/lisp/add-log.el
+++ b/lisp/add-log.el
@@ -26,23 +26,23 @@
 
 ;;; Code:
 
-;;;###autoload
 (defvar change-log-default-name nil
   "*Name of a change log file for \\[add-change-log-entry].")
 
-;;;###autoload
 (defvar add-log-current-defun-function nil
   "\
 *If non-nil, function to guess name of current function from surrounding text.
 \\[add-change-log-entry] calls this function (if nil, `add-log-current-defun'
 instead) with no arguments.  It returns a string or nil if it cannot guess.")
 
-;;;###autoload
+;; This MUST not be autoloaded, since user-login-name
+;; cannot be known at Emacs dump time.
 (defvar add-log-full-name (user-full-name)
   "*Full name of user, for inclusion in ChangeLog daily headers.
 This defaults to the value returned by the `user-full-name' function.")
 
-;;;###autoload
+;; This MUST not be autoloaded, since user-login-name
+;; cannot be known at Emacs dump time.
 (defvar add-log-mailing-address (concat (user-login-name) "@" (system-name))
   "*Electronic mail address of user, for inclusion in ChangeLog daily headers.
 This defaults to the value returned by `user-login-name', followed by