(display-message-or-buffer): Fix last change.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 63a07fa7933d08cfe5478d02e9558c76d391fe99..85069b254ee774d9aa1cf868b5a5f5e1ffa93c5a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -2,6 +2,7 @@
 
        * simple.el (shell-command-on-region): Handle errors and signals
        from shell command execution.
+       (display-message-or-buffer): Fix last change.
 
        * dired.el (dired-view-file): Quote file name for
        dired-run-shell-command.

diff --git a/lisp/simple.el b/lisp/simple.el
index 0b91abb8ecbc2b675fc5266a4ba2700313e1c449..416b6934f5ef19bea307a97ff1e3c34c84258806 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1348,7 +1348,7 @@ and only used if a buffer is displayed."
                                   1)))
                         ;; Don't use the echo area if the output buffer is
                         ;; already dispayed in the selected frame.
-                        (not (get-buffer-window buffer)))
+                        (not (get-buffer-window (current-buffer))))
                    ;; Echo area
                    (goto-char (point-max))
                    (when (bolp)