Mercurial > emacs
changeset 68530:52ef8d8ecd83
(which-func-mode): Shush compiler on Emacs 21 too.
| author | Bill Wohler <wohler@newt.com> |
|---|---|
| date | Wed, 01 Feb 2006 23:37:26 +0000 |
| parents | 7daec5f4a289 |
| children | bc4eb48b74d0 |
| files | lisp/mh-e/ChangeLog lisp/mh-e/mh-search.el |
| diffstat | 2 files changed, 7 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mh-e/ChangeLog Wed Feb 01 23:24:34 2006 +0000 +++ b/lisp/mh-e/ChangeLog Wed Feb 01 23:37:26 2006 +0000 @@ -1,5 +1,7 @@ 2006-02-01 Bill Wohler <wohler@newt.com> + * mh-search.el (which-func-mode): Shush compiler on Emacs 21 too. + * mh-alias.el (mh-alias-gecos-name): Use mh-replace-regexp-in-string instead of replace-regexp-in-string. (crm, multi-prompt): Use mh-require instead of require.
--- a/lisp/mh-e/mh-search.el Wed Feb 01 23:24:34 2006 +0000 +++ b/lisp/mh-e/mh-search.el Wed Feb 01 23:37:26 2006 +0000 @@ -51,7 +51,6 @@ (require 'gnus-util) (require 'imenu) -(mh-require 'which-func nil t) (defvar mh-searcher nil "Cached value of chosen search program.") @@ -1410,8 +1409,12 @@ (when cur-msg (mh-goto-msg cur-msg t t)) (set-buffer-modified-p old-buffer-modified-flag))) +(mh-require 'which-func nil t) + ;; Shush compiler. -(eval-when-compile (mh-do-in-xemacs (defvar which-func-mode))) +(eval-when-compile + (if (or mh-xemacs-flag (< emacs-major-version 22)) + (defvar which-func-mode))) ;;;###mh-autoload (defun mh-index-create-imenu-index ()