# HG changeset patch
# User Miles Bader <miles@gnu.org>
# Date 1003107654 0
# Node ID 728d02aa7502286cb695bbc22ab191eccf39521b
# Parent  2f2aaaa2444ec503e5e45bf0270c0dd1ff65ab9b
(display-message-or-buffer): Pass the correct buffer to `display-buffer'.

diff -r 2f2aaaa2444e -r 728d02aa7502 lisp/simple.el
--- a/lisp/simple.el	Sun Oct 14 22:45:14 2001 +0000
+++ b/lisp/simple.el	Mon Oct 15 01:00:54 2001 +0000
@@ -1305,7 +1305,8 @@
 		   (t
 		    ;; Buffer
 		    (goto-char (point-min))
-		    (display-buffer message not-this-window frame))))))))
+		    (display-buffer (current-buffer)
+				    not-this-window frame))))))))
 
 
 ;; We have a sentinel to prevent insertion of a termination message