Commit 5e78e475 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(Fuser_variable_p): If not a symbol, return nil.

parent f0b188ed
......@@ -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;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment