Lines Matching +refs:icon +refs:mode
98 the default buttons in the folder and show mode buffers are being
100 letter mode are listed. FUNC1, FUNC2, FUNC3, ... are the names of
125 ICON is the icon that is drawn in the button.
151 (icon (nth 2 button))
152 (xemacs-icon (mh-do-in-xemacs
153 `(cdr (assoc (quote ,(intern icon)) mh-xemacs-icon-map))))
193 (add-to-list vector-list `(vector ,xemacs-icon ',function t ,full-doc))
197 tool-bar-add-item ,icon ',function ',key
218 (defun mh-buffer-exists-p (mode)
219 "Test whether a buffer with major mode MODE is present."
222 (eq major-mode mode))
226 (when (mh-buffer-exists-p 'mh-folder-mode)
249 (when (mh-buffer-exists-p 'mh-letter-mode)
260 (defun mh-tool-bar-update (mode default-map sequence-map)
265 (if (eq mode major-mode)
272 ;; created, but before mh-folder-mode has run and
276 "Construct tool bar for `mh-folder-mode' and `mh-show-mode'."
279 (mh-tool-bar-update 'mh-folder-mode mh-folder-tool-bar-map
281 (mh-tool-bar-update 'mh-show-mode mh-show-tool-bar-map
284 "Construct tool bar for `mh-letter-mode'."
287 (mh-tool-bar-update 'mh-letter-mode mh-letter-tool-bar-map
323 (defun mh-tool-bar-init (mode)
326 (let ((tool-bar (cond ((eq mode :folder)
328 ((eq mode :letter)
330 ((eq mode :show)
377 ;; The icon names are duplicated in the Makefile and mh-xemacs.el.
466 ;; indent-tabs-mode: nil