# HG changeset patch # User Chong Yidong # Date 1223754976 0 # Node ID e8086088177952a7751ce3a9290408d5564b5468 # Parent 14621c767c96b380a6d6ae9717a9602a32389fdc * pmail.el (pmail-tool-bar-map): Initialize it unconditionally. diff -r 14621c767c96 -r e80860881779 lisp/mail/pmail.el --- a/lisp/mail/pmail.el Sat Oct 11 19:45:51 2008 +0000 +++ b/lisp/mail/pmail.el Sat Oct 11 19:56:16 2008 +0000 @@ -1203,33 +1203,32 @@ ;; Pmail toolbar (defvar pmail-tool-bar-map - (if (display-graphic-p) - (let ((map (make-sparse-keymap))) - (tool-bar-local-item-from-menu 'pmail-get-new-mail "mail/inbox" - map pmail-mode-map) - (tool-bar-local-item-from-menu 'pmail-next-undeleted-message "right-arrow" - map pmail-mode-map) - (tool-bar-local-item-from-menu 'pmail-previous-undeleted-message "left-arrow" - map pmail-mode-map) - (tool-bar-local-item-from-menu 'pmail-search "search" - map pmail-mode-map) - (tool-bar-local-item-from-menu 'pmail-input "open" - map pmail-mode-map) - (tool-bar-local-item-from-menu 'pmail-mail "mail/compose" - map pmail-mode-map) - (tool-bar-local-item-from-menu 'pmail-reply "mail/reply-all" - map pmail-mode-map) - (tool-bar-local-item-from-menu 'pmail-forward "mail/forward" - map pmail-mode-map) - (tool-bar-local-item-from-menu 'pmail-delete-forward "close" - map pmail-mode-map) - (tool-bar-local-item-from-menu 'pmail-output "mail/move" - map pmail-mode-map) - (tool-bar-local-item-from-menu 'pmail-output-body-to-file "mail/save" - map pmail-mode-map) - (tool-bar-local-item-from-menu 'pmail-expunge "delete" - map pmail-mode-map) - map))) + (let ((map (make-sparse-keymap))) + (tool-bar-local-item-from-menu 'pmail-get-new-mail "mail/inbox" + map pmail-mode-map) + (tool-bar-local-item-from-menu 'pmail-next-undeleted-message "right-arrow" + map pmail-mode-map) + (tool-bar-local-item-from-menu 'pmail-previous-undeleted-message "left-arrow" + map pmail-mode-map) + (tool-bar-local-item-from-menu 'pmail-search "search" + map pmail-mode-map) + (tool-bar-local-item-from-menu 'pmail-input "open" + map pmail-mode-map) + (tool-bar-local-item-from-menu 'pmail-mail "mail/compose" + map pmail-mode-map) + (tool-bar-local-item-from-menu 'pmail-reply "mail/reply-all" + map pmail-mode-map) + (tool-bar-local-item-from-menu 'pmail-forward "mail/forward" + map pmail-mode-map) + (tool-bar-local-item-from-menu 'pmail-delete-forward "close" + map pmail-mode-map) + (tool-bar-local-item-from-menu 'pmail-output "mail/move" + map pmail-mode-map) + (tool-bar-local-item-from-menu 'pmail-output-body-to-file "mail/save" + map pmail-mode-map) + (tool-bar-local-item-from-menu 'pmail-expunge "delete" + map pmail-mode-map) + map))