(Fdefalias): Record in load-history redefining an autoload.

1 files changed, 3 insertions, 0 deletions

diff --git a/src/data.c b/src/data.c
index c8867ef3cd7..bde8ec3c831 100644
--- a/src/data.c
+++ b/src/data.c
@@ -715,6 +715,9 @@ determined by DEFINITION.  */)
      (symbol, definition, docstring)
      register Lisp_Object symbol, definition, docstring;
 {
+  if (CONSP (XSYMBOL (symbol)->function)
+      && EQ (XCAR (XSYMBOL (symbol)->function), Qautoload))
+    LOADHIST_ATTACH (Fcons (Qt, symbol));
   definition = Ffset (symbol, definition);
   LOADHIST_ATTACH (symbol);
   if (!NILP (docstring))