diff options
author | Richard M. Stallman <rms@gnu.org> | 1998-04-18 14:36:05 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1998-04-18 14:36:05 +0000 |
commit | 3060a06227cc74dff411c11bd200d308975efc4c (patch) | |
tree | 9f934fa9342f4cc16d7fae2e4bd228edd9baa524 /lisp/emacs-lisp | |
parent | b61e2c11a2dc5dedfb20982a64eb82d3ebf2e98f (diff) | |
download | emacs-3060a06227cc74dff411c11bd200d308975efc4c.tar.gz emacs-3060a06227cc74dff411c11bd200d308975efc4c.tar.bz2 emacs-3060a06227cc74dff411c11bd200d308975efc4c.zip |
(edebug-compute-previous-result):
Don't pass floating value to single-key-description.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/edebug.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el index ba16218def9..d758a0d1e0a 100644 --- a/lisp/emacs-lisp/edebug.el +++ b/lisp/emacs-lisp/edebug.el @@ -3690,7 +3690,7 @@ Return the result of the last expression." (defun edebug-compute-previous-result (edebug-previous-value) (setq edebug-previous-result - (if (and (numberp edebug-previous-value) + (if (and (integerp edebug-previous-value) (< edebug-previous-value 256) (>= edebug-previous-value 0)) (format "Result: %s = %s" edebug-previous-value |