diff options
| author | Richard M. Stallman <rms@gnu.org> | 1992-05-13 23:02:02 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1992-05-13 23:02:02 +0000 |
| commit | d7cc5ab0a492ec9494150b46ce4915891f016256 (patch) | |
| tree | 755c786a8f508eeeff17b565ba5294ceb7ce9064 /src/callint.c | |
| parent | d6751de07bf7f483e45a6c381df7f6724973379b (diff) | |
| download | emacs-d7cc5ab0a492ec9494150b46ce4915891f016256.tar.gz | |
*** empty log message ***
Diffstat (limited to 'src/callint.c')
| -rw-r--r-- | src/callint.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/callint.c b/src/callint.c index 0075ef721dc..88c16721116 100644 --- a/src/callint.c +++ b/src/callint.c @@ -525,7 +525,7 @@ Its numeric meaning is what you would get from `(interactive \"p\")'.") if (NILP (raw)) XFASTINT (val) = 1; - else if (XTYPE (raw) == Lisp_Symbol) + else if (EQ (val, Qminus)) XSETINT (val, -1); else if (CONSP (raw)) XSETINT (val, XINT (XCONS (raw)->car)); |