Mercurial > emacs
comparison lisp/mh-e/mh-e.el @ 67656:76690fbcd56a
* mh-customize.el (mh-toolbar): Rename to mh-tool-bar.
(mh-tool-bar-search-function): Sync docstrings with manual.
(mh-tool-bar-customize): Replace toolbar with tool bar in docstring.
(mh-tool-bar-letter-help): Fix manual reference.
(mh-xemacs-use-toolbar-flag): Rename to mh-xemacs-use-tool-bar-flag.
Initialize to mh-xemacs-has-tool-bar-flag. Sync docstrings with
manual.
(mh-xemacs-toolbar-position): Rename to mh-xemacs-tool-bar-position.
Initialize to nil. Drop "no tool bar" option (redundant) and change
"Same As Default Tool Bar" setting to nil. Sync docstrings with
manual.
(mh-tool-bar-define): Replace toolbar with tool-bar or tool bar
depending on context.
(mh-toolbar-init): Rename to mh-tool-bar-init. Simplified condition
for calling set-specifier. Only look at the value of
mh-xemacs-use-tool-bar-flag.
(mh-tool-bar-folder-buttons, mh-tool-bar-letter-buttons): Sync
docstrings with manual.
* mh-comp.el (mh-letter-mode): Use mh-tool-bar-init instead of
mh-toolbar-init.
* mh-e.el (mh-folder-mode): Ditto.
* mh-utils.el (mh-show-mode): Ditto.
| author | Bill Wohler <wohler@newt.com> |
|---|---|
| date | Mon, 19 Dec 2005 05:37:02 +0000 |
| parents | 772ee2be41b9 |
| children | 3a8785724cca |
comparison
equal
deleted
inserted
replaced
| 67655:6cba278fc764 | 67656:76690fbcd56a |
|---|---|
| 1740 (cons '(mh-showing-mode " Show") minor-mode-alist))) | 1740 (cons '(mh-showing-mode " Show") minor-mode-alist))) |
| 1741 (easy-menu-add mh-folder-sequence-menu) | 1741 (easy-menu-add mh-folder-sequence-menu) |
| 1742 (easy-menu-add mh-folder-message-menu) | 1742 (easy-menu-add mh-folder-message-menu) |
| 1743 (easy-menu-add mh-folder-folder-menu) | 1743 (easy-menu-add mh-folder-folder-menu) |
| 1744 (set (make-local-variable 'tool-bar-map) mh-folder-tool-bar-map) | 1744 (set (make-local-variable 'tool-bar-map) mh-folder-tool-bar-map) |
| 1745 (mh-funcall-if-exists mh-toolbar-init :folder) | 1745 (mh-funcall-if-exists mh-tool-bar-init :folder) |
| 1746 (if (and mh-xemacs-flag | 1746 (if (and mh-xemacs-flag |
| 1747 font-lock-auto-fontify) | 1747 font-lock-auto-fontify) |
| 1748 (turn-on-font-lock))) ; Force font-lock in XEmacs. | 1748 (turn-on-font-lock))) ; Force font-lock in XEmacs. |
| 1749 | 1749 |
| 1750 (defun mh-toggle-mime-buttons () | 1750 (defun mh-toggle-mime-buttons () |