# HG changeset patch # User Richard M. Stallman # Date 753430533 0 # Node ID 61c4250fb760eb792874e7473b1b5936f387e98d # Parent 0bcb829bd1a35caa3e82dccea3cf46d06ddb77be (change-log-default-name, add-log-current-defun-function) (add-log-full-name, add-log-mailing-address): Delete autoload cookies. diff -r 0bcb829bd1a3 -r 61c4250fb760 lisp/add-log.el --- a/lisp/add-log.el Tue Nov 16 06:08:33 1993 +0000 +++ b/lisp/add-log.el Tue Nov 16 06:15:33 1993 +0000 @@ -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