# HG changeset patch
# User Bill Wohler <wohler@newt.com>
# Date 1145050132 0
# Node ID 0e0916499a151396b6abf86a2b85589fdf6de338
# Parent  a0de53f6c617027fdd62d5df1f9522a33414cbf4
* mh-funcs.el (view-exit-action): No need to wrap defvar with
eval-when-compile when shushing compiler.

* mh-mime.el (mh-identity-pgg-default-user-id): Ditto.

* mh-seq.el (view-exit-action): Ditto.

* mh-show.el (font-lock-auto-fontify): Ditto.

* mh-utils.el (mh-speed-flists-cache): Ditto

diff -r a0de53f6c617 -r 0e0916499a15 lisp/mh-e/ChangeLog
--- a/lisp/mh-e/ChangeLog	Fri Apr 14 18:49:18 2006 +0000
+++ b/lisp/mh-e/ChangeLog	Fri Apr 14 21:28:52 2006 +0000
@@ -1,5 +1,16 @@
 2006-04-14  Bill Wohler  <wohler@newt.com>
 
+	* mh-funcs.el (view-exit-action): No need to wrap defvar with
+	eval-when-compile when shushing compiler.
+
+	* mh-mime.el (mh-identity-pgg-default-user-id): Ditto.
+
+	* mh-seq.el (view-exit-action): Ditto.
+
+	* mh-show.el (font-lock-auto-fontify): Ditto.
+
+	* mh-utils.el (mh-speed-flists-cache): Ditto
+
 	* mh-compat.el (mh-font-lock-add-keywords): New alias for
 	font-lock-add-keywords. Returns nil on XEmacs.	
 
diff -r a0de53f6c617 -r 0e0916499a15 lisp/mh-e/mh-funcs.el
--- a/lisp/mh-e/mh-funcs.el	Fri Apr 14 18:49:18 2006 +0000
+++ b/lisp/mh-e/mh-funcs.el	Fri Apr 14 21:28:52 2006 +0000
@@ -138,7 +138,7 @@
     (display-buffer mh-temp-buffer)))
 
 ;; Shush compiler.
-(eval-when-compile (defvar view-exit-action))
+(defvar view-exit-action)
 
 ;;;###mh-autoload
 (defun mh-list-folders ()
diff -r a0de53f6c617 -r 0e0916499a15 lisp/mh-e/mh-mime.el
--- a/lisp/mh-e/mh-mime.el	Fri Apr 14 18:49:18 2006 +0000
+++ b/lisp/mh-e/mh-mime.el	Fri Apr 14 21:28:52 2006 +0000
@@ -1537,7 +1537,7 @@
     (after-find-file nil)))
 
 ;; Shush compiler.
-(eval-when-compile (defvar mh-identity-pgg-default-user-id))
+(defvar mh-identity-pgg-default-user-id)
 
 ;;;###mh-autoload
 (defun mh-mml-secure-message-encrypt (method)
diff -r a0de53f6c617 -r 0e0916499a15 lisp/mh-e/mh-seq.el
--- a/lisp/mh-e/mh-seq.el	Fri Apr 14 18:49:18 2006 +0000
+++ b/lisp/mh-e/mh-seq.el	Fri Apr 14 21:28:52 2006 +0000
@@ -134,7 +134,7 @@
       (apply #'mh-speed-flists t folders-changed))))
 
 ;; Shush compiler.
-(eval-when-compile (defvar view-exit-action))
+(defvar view-exit-action)
 
 ;;;###mh-autoload
 (defun mh-list-sequences ()
diff -r a0de53f6c617 -r 0e0916499a15 lisp/mh-e/mh-show.el
--- a/lisp/mh-e/mh-show.el	Fri Apr 14 18:49:18 2006 +0000
+++ b/lisp/mh-e/mh-show.el	Fri Apr 14 21:28:52 2006 +0000
@@ -815,7 +815,7 @@
 (put 'mh-show-mode 'mode-class 'special)
 
 ;; Shush compiler.
-(eval-when-compile (defvar font-lock-auto-fontify))
+(defvar font-lock-auto-fontify)
 
 ;;;###mh-autoload
 (define-derived-mode mh-show-mode text-mode "MH-Show"
diff -r a0de53f6c617 -r 0e0916499a15 lisp/mh-e/mh-utils.el
--- a/lisp/mh-e/mh-utils.el	Fri Apr 14 18:49:18 2006 +0000
+++ b/lisp/mh-e/mh-utils.el	Fri Apr 14 21:28:52 2006 +0000
@@ -657,7 +657,7 @@
 (defvar mh-folder-hist nil)
 
 ;; Shush compiler.
-(eval-when-compile (defvar mh-speed-flists-cache))
+(defvar mh-speed-flists-cache)
 
 (defvar mh-allow-root-folder-flag nil
   "Non-nil means \"+\" is an acceptable folder name.