diff options
| author | Chong Yidong | 2006-08-10 16:07:43 +0000 |
|---|---|---|
| committer | Chong Yidong | 2006-08-10 16:07:43 +0000 |
| commit | 65b13f4bc0c6821e03a3d3be0f2ba4ad70001976 (patch) | |
| tree | 2797f2f43f90269122b7f0b6184183292ccc4af1 | |
| parent | f80c9382efe996857f34ddd36ddfc7513dc08eb0 (diff) | |
| download | emacs-65b13f4bc0c6821e03a3d3be0f2ba4ad70001976.tar.gz emacs-65b13f4bc0c6821e03a3d3be0f2ba4ad70001976.zip | |
Minor fix to last change.
| -rw-r--r-- | lisp/emacs-lisp/edebug.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el index e7f5a736ded..5107ee60274 100644 --- a/lisp/emacs-lisp/edebug.el +++ b/lisp/emacs-lisp/edebug.el | |||
| @@ -2575,7 +2575,7 @@ MSG is printed after `::::} '." | |||
| 2575 | (overlay-arrow-string overlay-arrow-string) | 2575 | (overlay-arrow-string overlay-arrow-string) |
| 2576 | (cursor-in-echo-area nil) | 2576 | (cursor-in-echo-area nil) |
| 2577 | (default-cursor-in-non-selected-windows t) | 2577 | (default-cursor-in-non-selected-windows t) |
| 2578 | (unread-command-events nil) | 2578 | (unread-command-events unread-command-events) |
| 2579 | ;; any others?? | 2579 | ;; any others?? |
| 2580 | ) | 2580 | ) |
| 2581 | (if (not (buffer-name edebug-buffer)) | 2581 | (if (not (buffer-name edebug-buffer)) |
| @@ -2664,6 +2664,7 @@ MSG is printed after `::::} '." | |||
| 2664 | 2664 | ||
| 2665 | (t (message ""))) | 2665 | (t (message ""))) |
| 2666 | 2666 | ||
| 2667 | (setq unread-command-events nil) | ||
| 2667 | (if (eq 'after edebug-arg-mode) | 2668 | (if (eq 'after edebug-arg-mode) |
| 2668 | (progn | 2669 | (progn |
| 2669 | ;; Display result of previous evaluation. | 2670 | ;; Display result of previous evaluation. |