Mercurial > emacs
changeset 48724:ccd782f27e54
(Fdefun, Fdefmacro): Record in load-history redefining an autoload.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 07 Dec 2002 21:39:18 +0000 |
| parents | a6906c113d14 |
| children | 279d729bd941 |
| files | src/eval.c |
| diffstat | 1 files changed, 6 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/eval.c Sat Dec 07 21:38:39 2002 +0000 +++ b/src/eval.c Sat Dec 07 21:39:18 2002 +0000 @@ -637,6 +637,9 @@ defn = Fcons (Qlambda, Fcdr (args)); if (!NILP (Vpurify_flag)) defn = Fpurecopy (defn); + if (CONSP (XSYMBOL (fn_name)->function) + && EQ (XCAR (XSYMBOL (fn_name)->function), Qautoload)) + LOADHIST_ATTACH (Fcons (Qt, fn_name)); Ffset (fn_name, defn); LOADHIST_ATTACH (fn_name); return fn_name; @@ -702,6 +705,9 @@ if (!NILP (Vpurify_flag)) defn = Fpurecopy (defn); + if (CONSP (XSYMBOL (fn_name)->function) + && EQ (XCAR (XSYMBOL (fn_name)->function), Qautoload)) + LOADHIST_ATTACH (Fcons (Qt, fn_name)); Ffset (fn_name, defn); LOADHIST_ATTACH (fn_name); return fn_name;