# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 736482413 0
# Node ID 425c4138af315cbb5444c80daa5e45df8259b25b
# Parent  f879db79e748b26cfbcd26f962e0db06781e38d9
	* data.c (Ffset): Refuse to set the function value of t or nil.

diff -r f879db79e748 -r 425c4138af31 src/data.c
--- a/src/data.c	Tue May 04 02:24:42 1993 +0000
+++ b/src/data.c	Tue May 04 02:26:53 1993 +0000
@@ -518,6 +518,9 @@
      register Lisp_Object sym, newdef;
 {
   CHECK_SYMBOL (sym, 0);
+  if (NILP (sym) || EQ (sym, Qt))
+    return Fsignal (Qsetting_constant, Fcons (sym, Qnil));
+
   if (!NILP (Vautoload_queue) && !EQ (XSYMBOL (sym)->function, Qunbound))
     Vautoload_queue = Fcons (Fcons (sym, XSYMBOL (sym)->function),
 			     Vautoload_queue);