summaryrefslogtreecommitdiff
path: root/lisp/mh-e/mh-acros.el
diff options
context:
space:
mode:
authorBill Wohler <wohler@newt.com>2006-04-15 00:28:08 +0000
committerBill Wohler <wohler@newt.com>2006-04-15 00:28:08 +0000
commit42f8c37fa0bb7021950604259c7be0c3edd0814f (patch)
treed9efb57f5497caabd5bbd3121f669ca5269028be /lisp/mh-e/mh-acros.el
parent73e6d1af3e3449b6d207cafe76258ccd20ca9849 (diff)
downloademacs-42f8c37fa0bb7021950604259c7be0c3edd0814f.tar.gz
* mh-acros.el (struct, x, y): No need to wrap defvar with
eval-when-compile when shushing compiler, even when mh-do-in-xemacs or another construct is used. * mh-comp.el (sendmail-coding-system): Ditto. * mh-e.el (mark-active): Ditto. * mh-folder.el (desktop-save-buffer, font-lock-auto-fontify) (image-load-path, font-lock-defaults): Ditto. * mh-letter.el (image-load-path, font-lock-defaults): Ditto. * mh-mime.el (dots, type, ov) (mm-verify-function-alist, mm-decrypt-function-alist) (pressed-details): Ditto. * mh-search.el (pick-folder, mh-do-in-xemacs) (mh-mairix-folder, mh-flists-search-folders) (which-func-mode, mh-speed-flists-inhibit-flag): Ditto. * mh-seq.el (tool-bar-mode): Ditto. * mh-utils.el (completion-root-regexp) (minibuffer-completing-file-name): Ditto. * mh-xface.el (default-enable-multibyte-characters): Ditto.
Diffstat (limited to 'lisp/mh-e/mh-acros.el')
-rw-r--r--lisp/mh-e/mh-acros.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/mh-e/mh-acros.el b/lisp/mh-e/mh-acros.el
index 8f38abc56ee..41fadc1ec99 100644
--- a/lisp/mh-e/mh-acros.el
+++ b/lisp/mh-e/mh-acros.el
@@ -130,7 +130,9 @@ check if variable `transient-mark-mode' is active."
(boundp 'mark-active) mark-active))))
;; Shush compiler.
-(eval-when-compile (mh-do-in-xemacs (defvar struct) (defvar x) (defvar y)))
+(defvar struct) ; XEmacs
+(defvar x) ; XEmacs
+(defvar y) ; XEmacs
;;;###mh-autoload
(defmacro mh-defstruct (name-spec &rest fields)