From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 27 Dec 2004 16:03:49 +0000 (+0000)
Subject: (Fdefalias): Use (defun . FN_NAME) in LOADHIST_ATTACH.
X-Git-Tag: ttn-vms-21-2-B4~3139
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=62a29071d6d3014edc8995bf424a37ba929d12c4;p=emacs.git

(Fdefalias): Use (defun . FN_NAME) in LOADHIST_ATTACH.
---

diff --git a/src/data.c b/src/data.c
index 811619b58b3..be1e4d33bbb 100644
--- a/src/data.c
+++ b/src/data.c
@@ -723,7 +723,7 @@ determined by DEFINITION.  */)
       && EQ (XCAR (XSYMBOL (symbol)->function), Qautoload))
     LOADHIST_ATTACH (Fcons (Qt, symbol));
   definition = Ffset (symbol, definition);
-  LOADHIST_ATTACH (symbol);
+  LOADHIST_ATTACH (Fcons (Qdefun, symbol));
   if (!NILP (docstring))
     Fput (symbol, Qfunction_documentation, docstring);
   return definition;