* wl.el (wl-check-environment): Additional check for

	'wl-local-domain' and `wl-message-id-domain'.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 9464e8c..016e4c2 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2000-11-27  Kenichi OKADA  <okada@opaopa.org>
+
+       * wl.el (wl-check-environment): Additional check for
+       'wl-local-domain' and `wl-message-id-domain'.
+
 2000-11-22  Yuuichi Teranishi  <teranisi@gohome.org>
 
        * Version number is increased to 2.5.3.

diff --git a/wl/wl.el b/wl/wl.el
index d9312bf..23e5de5 100644 (file)
--- a/wl/wl.el
+++ b/wl/wl.el
@@ -713,6 +713,10 @@ Entering Plugged mode calls the value of `wl-plugged-mode-hook'."
                                        "." wl-local-domain)
                              (system-name))))
       (error "Please remove `@' from `wl-message-id-domain'"))
+  (if (string= wl-local-domain "localdomain")
+      (error "Please set `wl-local-domain'."))
+  (if (string= wl-message-id-domain "localhost.localdomain")
+      (error "Please set `wl-message-id-domain'."))
   (when (not no-check-folder)
     (if (not (eq (elmo-folder-get-type wl-draft-folder) 'localdir))
        (error "%s is not allowed for draft folder" wl-draft-folder))