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;