aboutsummaryrefslogtreecommitdiffstats
path: root/src/data.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/data.c')
-rw-r--r--src/data.c3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/data.c b/src/data.c
index 613d9db6a64..c4473c8cbd3 100644
--- a/src/data.c
+++ b/src/data.c
@@ -518,6 +518,9 @@ DEFUN ("fset", Ffset, Sfset, 2, 2, 0,
518 register Lisp_Object sym, newdef; 518 register Lisp_Object sym, newdef;
519{ 519{
520 CHECK_SYMBOL (sym, 0); 520 CHECK_SYMBOL (sym, 0);
521 if (NILP (sym) || EQ (sym, Qt))
522 return Fsignal (Qsetting_constant, Fcons (sym, Qnil));
523
521 if (!NILP (Vautoload_queue) && !EQ (XSYMBOL (sym)->function, Qunbound)) 524 if (!NILP (Vautoload_queue) && !EQ (XSYMBOL (sym)->function, Qunbound))
522 Vautoload_queue = Fcons (Fcons (sym, XSYMBOL (sym)->function), 525 Vautoload_queue = Fcons (Fcons (sym, XSYMBOL (sym)->function),
523 Vautoload_queue); 526 Vautoload_queue);