Mercurial > emacs
comparison src/data.c @ 48723:a6906c113d14
(Fdefalias): Record in load-history redefining an autoload.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 07 Dec 2002 21:38:39 +0000 |
parents | fbe02a367006 |
children | 39ba2cdf869e |
comparison
equal
deleted
inserted
replaced
48722:6cea9f00471e | 48723:a6906c113d14 |
---|---|
713 for SYMBOL; if it is omitted or nil, SYMBOL uses the documentation string | 713 for SYMBOL; if it is omitted or nil, SYMBOL uses the documentation string |
714 determined by DEFINITION. */) | 714 determined by DEFINITION. */) |
715 (symbol, definition, docstring) | 715 (symbol, definition, docstring) |
716 register Lisp_Object symbol, definition, docstring; | 716 register Lisp_Object symbol, definition, docstring; |
717 { | 717 { |
718 if (CONSP (XSYMBOL (symbol)->function) | |
719 && EQ (XCAR (XSYMBOL (symbol)->function), Qautoload)) | |
720 LOADHIST_ATTACH (Fcons (Qt, symbol)); | |
718 definition = Ffset (symbol, definition); | 721 definition = Ffset (symbol, definition); |
719 LOADHIST_ATTACH (symbol); | 722 LOADHIST_ATTACH (symbol); |
720 if (!NILP (docstring)) | 723 if (!NILP (docstring)) |
721 Fput (symbol, Qfunction_documentation, docstring); | 724 Fput (symbol, Qfunction_documentation, docstring); |
722 return definition; | 725 return definition; |