diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2022-01-28 23:39:31 -0500 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2022-01-28 23:39:31 -0500 |
| commit | 70fc32f6ddef871dd2ae15a3333974f6d8231d6a (patch) | |
| tree | ccfdc687becd0537964ca1b45bd1f3d34b83ba01 /src/data.c | |
| parent | 7531bf096eb3f1b0b6612e94eb5211405e049fee (diff) | |
| download | emacs-70fc32f6ddef871dd2ae15a3333974f6d8231d6a.tar.gz emacs-70fc32f6ddef871dd2ae15a3333974f6d8231d6a.tar.bz2 emacs-70fc32f6ddef871dd2ae15a3333974f6d8231d6a.zip | |
* src/data.c (Ffset, defalias): Complete last change
Somehow part of the autoload history handling was left behind in `Ffset`
when the rest was moved to `defalias`. Finish the job.
* src/data.c (Ffset): Don't set the `autoload` property here...
(defalias): ... set it here instead.
Diffstat (limited to 'src/data.c')
| -rw-r--r-- | src/data.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/data.c b/src/data.c index dd6ec4c41a8..039e6c31134 100644 --- a/src/data.c +++ b/src/data.c @@ -846,9 +846,6 @@ DEFUN ("fset", Ffset, Sfset, 2, 2, 0, function = XSYMBOL (symbol)->u.s.function; - if (AUTOLOADP (function)) - Fput (symbol, Qautoload, XCDR (function)); - eassert (valid_lisp_object_p (definition)); #ifdef HAVE_NATIVE_COMP @@ -880,6 +877,9 @@ defalias (Lisp_Object symbol, Lisp_Object definition) if (!NILP (Vautoload_queue) && !NILP (function)) Vautoload_queue = Fcons (Fcons (symbol, function), Vautoload_queue); + + if (AUTOLOADP (function)) + Fput (symbol, Qautoload, XCDR (function)); } } |