(Fuser_variable_p): If not a symbol, return nil.
This commit is contained in:
parent
f0b188ed3d
commit
5e78e475d4
1 changed files with 3 additions and 0 deletions
|
@ -658,6 +658,9 @@ for the variable is `*'.")
|
|||
{
|
||||
Lisp_Object documentation;
|
||||
|
||||
if (!SYMBOLP (variable))
|
||||
return Qnil;
|
||||
|
||||
documentation = Fget (variable, Qvariable_documentation);
|
||||
if (INTEGERP (documentation) && XINT (documentation) < 0)
|
||||
return Qt;
|
||||
|
|
Loading…
Add table
Reference in a new issue