src/data.c (set_internal): Mention var which can't be unbound in error msg
This commit is contained in:
@@ -1724,7 +1724,8 @@ set_internal (Lisp_Object symbol, Lisp_Object newval, Lisp_Object where,
|
||||
|
||||
if (unbinding_p && blv->fwd)
|
||||
/* Forbid unbinding built-in variables. */
|
||||
error ("Built-in variables may not be unbound");
|
||||
error ("Built-in variable may not be unbound : %s",
|
||||
SDATA (SYMBOL_NAME (symbol)));
|
||||
|
||||
if (NILP (where))
|
||||
XSETBUFFER (where, current_buffer);
|
||||
@@ -1803,7 +1804,8 @@ set_internal (Lisp_Object symbol, Lisp_Object newval, Lisp_Object where,
|
||||
|
||||
if (unbinding_p)
|
||||
/* Forbid unbinding built-in variables. */
|
||||
error ("Built-in variables may not be unbound");
|
||||
error ("Built-in variable may not be unbound : %s",
|
||||
SDATA (SYMBOL_NAME (symbol)));
|
||||
|
||||
if (BUFFER_OBJFWDP (innercontents))
|
||||
{
|
||||
|
||||
Reference in New Issue
Block a user