From: okada <okada>
Date: Thu, 17 Jan 2002 10:04:06 +0000 (+0000)
Subject: Fix.
X-Git-Tag: wl-2_9_5~6
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=54e9d968ba9330e32bb3ed0f28d18f3146c755ad;p=elisp%2Fwanderlust.git

Fix.
---

diff --git a/wl/wl.el b/wl/wl.el
index 1dbe681..ed81a1c 100644
--- a/wl/wl.el
+++ b/wl/wl.el
@@ -703,7 +703,7 @@ Entering Plugged mode calls the value of `wl-plugged-mode-hook'."
 (defun wl-check-environment (no-check-folder)
   (unless wl-from (error "Please set `wl-from'"))
   ;; Message-ID
-  (let ((from domain))
+  (let (from domain)
     (if wl-message-id-use-wl-from
 	(if (and (setq from (wl-address-header-extract-address wl-from))
 		 (string-match "^\\(.*\\)@\\(.*\\)$" from))