diff lisp/prim/simple.el @ 167:85ec50267440 r20-3b10

Import from CVS: tag r20-3b10
author cvs
date Mon, 13 Aug 2007 09:45:46 +0200
parents 5a88923fcbfe
children 15872534500d
line wrap: on
line diff
--- a/lisp/prim/simple.el	Mon Aug 13 09:44:44 2007 +0200
+++ b/lisp/prim/simple.el	Mon Aug 13 09:45:46 2007 +0200
@@ -3290,6 +3290,11 @@
 should be logged.  Possible values include 'log-message-filter and
 'log-message-filter-errors-only.")
 
+(defun show-message-log ()
+  "Show the \" *Message-Log*\" buffer, which contains old messages and errors."
+  (interactive)
+  (pop-to-buffer " *Message-Log*"))
+
 (defun log-message-filter (label message)
   "Default value of log-message-filter-function.
 Mesages whose text matches one of the log-message-ignore-regexps