diff options
| author | Stefan Monnier | 2022-01-28 23:39:31 -0500 |
|---|---|---|
| committer | Stefan Monnier | 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.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, | |||
| 846 | 846 | ||
| 847 | function = XSYMBOL (symbol)->u.s.function; | 847 | function = XSYMBOL (symbol)->u.s.function; |
| 848 | 848 | ||
| 849 | if (AUTOLOADP (function)) | ||
| 850 | Fput (symbol, Qautoload, XCDR (function)); | ||
| 851 | |||
| 852 | eassert (valid_lisp_object_p (definition)); | 849 | eassert (valid_lisp_object_p (definition)); |
| 853 | 850 | ||
| 854 | #ifdef HAVE_NATIVE_COMP | 851 | #ifdef HAVE_NATIVE_COMP |
| @@ -880,6 +877,9 @@ defalias (Lisp_Object symbol, Lisp_Object definition) | |||
| 880 | 877 | ||
| 881 | if (!NILP (Vautoload_queue) && !NILP (function)) | 878 | if (!NILP (Vautoload_queue) && !NILP (function)) |
| 882 | Vautoload_queue = Fcons (Fcons (symbol, function), Vautoload_queue); | 879 | Vautoload_queue = Fcons (Fcons (symbol, function), Vautoload_queue); |
| 880 | |||
| 881 | if (AUTOLOADP (function)) | ||
| 882 | Fput (symbol, Qautoload, XCDR (function)); | ||
| 883 | } | 883 | } |
| 884 | } | 884 | } |
| 885 | 885 | ||