* eval.c (Fautoload): Add entry in load-history (if after dump).

* lread.c (load-history): Update docstring.

src/ChangeLog

@@ -1,3 +1,8 @@
+2000-03-24  Stefan Monnier  <monnier@cs.yale.edu>
+
+	* eval.c (Fautoload): Add entry in load-history (if after dump).
+	* lread.c (load-history): Update docstring.
+
 2000-03-24  Gerd Moellmann  <gerd@gnu.org>
 
 	* indent.c (Fvertical_motion): Always use the current buffer.

src/eval.c

@@ -1646,6 +1646,11 @@ this does nothing and returns nil.")
 	   && EQ (XCAR (XSYMBOL (function)->function), Qautoload)))
     return Qnil;
 
+  if (NILP (Vpurify_flag))
+    /* Only add entries after dumping, because the ones before are
+       not useful and else we get loads of them from the loaddefs.el.  */
+    LOADHIST_ATTACH (Fcons (Qautoload, function));
+
 #ifdef NO_ARG_ARRAY
   args[0] = file;
   args[1] = docstring;

src/lread.c

@@ -3433,7 +3433,8 @@ Each alist element is a list that starts with a file name,\n\
 except for one element (optional) that starts with nil and describes\n\
 definitions evaluated from buffers not visiting files.\n\
 The remaining elements of each list are symbols defined as functions\n\
-or variables, and cons cells `(provide . FEATURE)' and `(require . FEATURE)'.");
+or variables, and cons cells `(provide . FEATURE)', `(require . FEATURE)',
+and `(autoload . SYMBOL)'.");
   Vload_history = Qnil;
 
   DEFVAR_LISP ("load-file-name", &Vload_file_name,