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 | 5e78e475d439f8f8e7d54db8821ae050a707c799 (patch) | |
| tree | 56d059311d06c693b34c1ad67d295a1250584c32 /src/eval.c | |
| parent | f0b188ed3d5e64498f3cc78cf928a88fc7a5a1e4 (diff) | |
| download | emacs-5e78e475d439f8f8e7d54db8821ae050a707c799.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; |