From: bg66 <bg66>
Date: Fri, 16 Feb 2007 00:59:16 +0000 (+0000)
Subject: * mixi-gnus.el: Avoid errors and warnings when compiling.
X-Git-Tag: mixi-el-1_0_0~72
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=0d5a9286069e1bb3779644f61c7c3a6d29ff5381;p=elisp%2Fmixi.git

* mixi-gnus.el: Avoid errors and warnings when compiling.

* mixi-wl.el: Ditto.
---

diff --git a/ChangeLog b/ChangeLog
index 3f31377..5b83982 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2007-02-16  OHASHI Akira  <bg66@koka-in.org>
+
+	* mixi-gnus.el: Avoid errors and warnings when compiling.
+
+	* mixi-wl.el: Ditto.
+
 2007-02-07  OHASHI Akira  <bg66@koka-in.org>
 
 	* mixi.el (mixi-url-retrieve): Don't show status to minibuffer.
diff --git a/mixi-gnus.el b/mixi-gnus.el
index 77b7312..82fb1cc 100644
--- a/mixi-gnus.el
+++ b/mixi-gnus.el
@@ -35,7 +35,18 @@
 ;;; Code:
 
 (require 'sb-mixi)
-(require 'message)
+
+;; Functions and variables which should be defined in the other module
+;; at run-time.
+(eval-when-compile
+  (defvar message-this-is-news)
+  (defvar message-sent-message-via)
+  (defvar message-send-method-alist)
+  (autoload 'message-narrow-to-headers "message")
+  (autoload 'message-fetch-field "message")
+  (autoload 'message-generate-new-buffer-clone-locals "message")
+  (autoload 'message-goto-body "message")
+  (autoload 'mml-buffer-substring-no-properties-except-hard-newlines "mml"))
 
 (defun message-mixi-p ()
   "Say whether the current buffer contains a mixi message."
diff --git a/mixi-wl.el b/mixi-wl.el
index 7ff0630..d4bf6e9 100644
--- a/mixi-wl.el
+++ b/mixi-wl.el
@@ -35,7 +35,19 @@
 ;;; Code:
 
 (require 'sb-mixi)
-(require 'wl-draft)
+
+;; Functions and variables which should be defined in the other module
+;; at run-time.
+(eval-when-compile
+  (defvar mail-header-separator)
+  (defvar wl-mime-charset)
+  (defvar wl-draft-send-confirm-with-preview)
+  (defvar wl-draft-send-mail-function)
+  (autoload 'std11-field-body "std11")
+  (autoload 'eword-decode-string "eword-decode")
+  (autoload 'wl-draft-set-sent-message "wl-draft")
+  (autoload 'wl-draft-write-sendlog "wl-draft")
+  (autoload 'decode-mime-charset-string "mcharset"))
 
 (defsubst mixi-wl-get-recipients-from-buffer ()
   (or (std11-field-body "mixi-to")