(mixi-gnus-setup): Avoid matching with bogus addresses

for `message-send-via-mixi'.

diff --git a/ChangeLog b/ChangeLog
index 5174fac..a4b51b6 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2008-07-31  OHASHI Akira  <bg66@koka-in.org>
+
+       * mixi-gnus.el (mixi-gnus-setup): Avoid matching with bogus addresses
+       for `message-send-via-mixi'.
+
 2008-07-08  OHASHI Akira  <bg66@koka-in.org>
 
        * mixi-el: Version 1.4.2 released.

diff --git a/mixi-gnus.el b/mixi-gnus.el
index 78c5cd3..1d00893 100644 (file)
--- a/mixi-gnus.el
+++ b/mixi-gnus.el
@@ -1,6 +1,6 @@
 ;;; mixi-gnus.el --- Gnus integration for mixi
 
-;; Copyright (C) 2007 OHASHI Akira
+;; Copyright (C) 2007, 2008 OHASHI Akira
 
 ;; Author: OHASHI Akira <bg66@koka-in.org>
 ;; Keywords: news
@@ -77,7 +77,10 @@
   (let ((method '(mixi message-mixi-p message-send-via-mixi)))
     (unless (member method message-send-method-alist)
       (setq message-send-method-alist
-           (cons method message-send-method-alist)))))
+           (cons method message-send-method-alist))))
+  ;; Avoid matching with bogus addresses for `message-send-via-mixi'.
+  (setq message-bogus-addresses
+       (remove "[ \t]" message-bogus-addresses)))
 
 (provide 'mixi-gnus)