2005-10-23 MIYOSHI Masanori <miyoshi@meadowy.org> (tiny change)

	* mouse.el (mouse-drag-region): If the *Messages* buffer doesn't
	exist, create it.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0054789f55ce4e9be0a7e21c0f66fdcee732e906..bf0a708d2f148439844969426ee79d8a78de40e9 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,10 +1,15 @@
+2005-10-23  MIYOSHI Masanori  <miyoshi@meadowy.org>  (tiny change)
+
+       * mouse.el (mouse-drag-region): If the *Messages* buffer doesn't
+       exist, create it.
+
 2005-10-23  Ken Manheimer  <ken.manheimer@gmail.com>
 
        * allout.el: Increment version number to 2.1, and use a literal
-       rather than RCS $Id$.  Remove autoloads for mailcrypt and crypt++.
+       rather than RCS $Id $.  Remove autoloads for mailcrypt and crypt++.
        Require pgg, pgg-gpg during compilation.
        (allout-version): Increment version number to 2.1, and use a literal
-       rather than RCS $Id$.
+       rather than RCS $Id $.
        (allout-default-encryption-scheme): Removed.
        (allout-passphrase-verifier-handling): Renamed from
        allout-key-verifier-handling.

diff --git a/lisp/mouse.el b/lisp/mouse.el
index d71d80bd41f0b669cb41d9ffb97de6320fb0c262..743aba94d5ec1619695ff1141a16bff18b1b95c0 100644 (file)
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -768,7 +768,7 @@ If the click is in the echo area, display the `*Messages*' buffer."
        (save-excursion
          ;; Swallow the up-event.
          (read-event)
-         (set-buffer "*Messages*")
+         (set-buffer (get-buffer-create "*Messages*"))
          (goto-char (point-max))
          (display-buffer (current-buffer)))
       ;; Give temporary modes such as isearch a chance to turn off.