(message-tool-bar-map): Add preview.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index cb1754a..7cadfaa 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2003-01-09  Simon Josefsson  <jas@extundo.com>
+
+       * message.el (message-tool-bar-map): Add preview.
+
 2003-01-09  Jesper Harder  <harder@ifa.au.dk>
 
        * mml.el (mml-preview): Get rid of MIME handles and buffers after

diff --git a/lisp/message.el b/lisp/message.el
index 248e9da..d791b13 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -6016,6 +6016,9 @@ which specify the range to operate on."
                'mml-attach-file "attach" tool-bar-map mml-mode-map)
               (message-tool-bar-local-item-from-menu
                'ispell-message "spell" tool-bar-map message-mode-map)
+              (message-tool-bar-local-item-from-menu
+               'mml-preview "preview"
+               tool-bar-map mml-mode-map)
               (message-tool-bar-local-item-from-menu
                'message-insert-importance-high "important"
                tool-bar-map message-mode-map)