In emacs, can I set up the *Messages* buffer so that it tails?

Question

Basically I want the *Messages* buffer to always scroll to the bottom when a new message arrives.

Can I do that?

Answer 1

For multiple frames you probably want:

(defadvice message (after message-tail activate)
  "goto point max after a message"
  (with-current-buffer "*Messages*"
    (goto-char (point-max))
    (walk-windows (lambda (window)
                    (if (string-equal (buffer-name (window-buffer window)) "*Messages*")
                        (set-window-point window (point-max))))
                  nil
                  t)))