Un-revert recent Ffset change

* src/data.c (Ffset): Reinstate the check for "nil".

diff --git a/src/data.c b/src/data.c
index 09d94f57a8ef823a072739635900ea9fef7b4e51..52cfe4ae4a3c36e734cec3d253a2436a55d10fa1 100644 (file)
--- a/src/data.c
+++ b/src/data.c
@@ -733,6 +733,9 @@ DEFUN ("fset", Ffset, Sfset, 2, 2, 0,
 {
   register Lisp_Object function;
   CHECK_SYMBOL (symbol);
+  /* Perhaps not quite the right error signal, but seems good enough.  */
+  if (NILP (symbol))
+    xsignal1 (Qsetting_constant, symbol);
 
   function = XSYMBOL (symbol)->function;