* wl-mime.el (toplevel): Avoid byte-compile warnings.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index ed2b877..b8606d6 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,7 @@
+2002-10-21  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+       * wl-mime.el (toplevel): Avoid byte-compile warnings.
+
 2002-10-21  Yoichi NAKAYAMA  <yoichi@eken.phys.nagoya-u.ac.jp>
 
        * wl-mime.el (wl-draft-yank-current-message-entity): Fix logic.

diff --git a/wl/wl-mime.el b/wl/wl-mime.el
index 91df931..df9101b 100644 (file)
--- a/wl/wl-mime.el
+++ b/wl/wl-mime.el
@@ -34,8 +34,13 @@
 (require 'mime-play)
 (require 'elmo)
 
+;; avoid compile warnings
 (eval-when-compile
-  (defalias-maybe 'Meadow-version 'ignore))
+  (defalias-maybe 'Meadow-version 'ignore)
+  (defvar-maybe zmacs-regions)
+  (defvar-maybe zmacs-region-active-p)
+  (defvar-maybe transient-mark-mode)
+  (defvar-maybe mark-active))
 
 (defvar xemacs-betaname)
 (defvar xemacs-codename)