* src/data.c: Fix regression in last clone-buffer change

* src/data.c (Fmake_local_variable, Fmake_variable_buffer_local):
Signal more precise error when applied to read-only variable.

diff --git a/src/data.c b/src/data.c
index 4a3afed6f715b3d97e3d368bc87cdbc3e9f06b37..7ca1892f64aa6f8d849d3fae88167e3839d39be0 100644 (file)
--- a/src/data.c
+++ b/src/data.c
@@ -1852,7 +1852,7 @@ The function `default-value' gets the default value and `set-default' sets it.
     }
 
   if (SYMBOL_CONSTANT_P (variable))
-    error ("Symbol %s may not be buffer-local", SDATA (SYMBOL_NAME (variable)));
+    xsignal1 (Qsetting_constant, variable);
 
   if (!blv)
     {
@@ -1915,8 +1915,7 @@ Instead, use `add-hook' and specify t for the LOCAL argument.  */)
     }
 
   if (sym->u.s.trapped_write == SYMBOL_NOWRITE)
-    error ("Symbol %s may not be buffer-local",
-          SDATA (SYMBOL_NAME (variable)));
+    xsignal1 (Qsetting_constant, variable);
 
   if (blv ? blv->local_if_set
       : (forwarded && BUFFER_OBJFWDP (valcontents.fwd)))