diff options
author | Richard M. Stallman <rms@gnu.org> | 1997-04-01 22:04:58 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1997-04-01 22:04:58 +0000 |
commit | 878837407db28ed1397fb3497435996251a684fb (patch) | |
tree | 50c37ac6db6f97f36c7f61afca4e0e770b1d5fb0 /src/eval.c | |
parent | 58a9be3b004d4aea3a42769a98baaa3f30200723 (diff) | |
download | emacs-878837407db28ed1397fb3497435996251a684fb.tar.gz |
(Fuser_variable_p): If not a symbol, return nil.
Diffstat (limited to 'src/eval.c')
-rw-r--r-- | src/eval.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/eval.c b/src/eval.c index 139f3f3abf1..eb08972bc67 100644 --- a/src/eval.c +++ b/src/eval.c @@ -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; |