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 | ba2aa08420b82f869eda698eb0b72f6e829f9be7 (patch) | |
| tree | 535f4a2711c173ae12a5aabb10dd8f02fb242ef1 /src | |
| parent | 67c86cfc518faa4c29b8c307a76d617267366bba (diff) | |
| download | emacs-ba2aa08420b82f869eda698eb0b72f6e829f9be7.tar.gz | |
*** empty log message ***
Diffstat (limited to 'src')
| -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)); |