X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=mixi-gnus.el;h=1d008933cd1fa9899d6d58a363a6419a58cbd1ad;hb=d215c048eef976e7d2ae5975b4165d5f144e525f;hp=009dd21376680d3ab68b667cbea1be9ebb087b3f;hpb=f20f165560bce2a6fc8f130ba3dc686f39e37753;p=elisp%2Fmixi.git diff --git a/mixi-gnus.el b/mixi-gnus.el index 009dd21..1d00893 100644 --- 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 ;; Keywords: news @@ -18,9 +18,9 @@ ;; GNU General Public License for more details. ;; You should have received a copy of the GNU General Public License -;; along with this program; if not, you can either send email to this -;; program's maintainer or write to: The Free Software Foundation, -;; Inc.; 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. +;; along with GNU Emacs; see the file COPYING. If not, write to the +;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, +;; Boston, MA 02110-1301, USA. ;;; Commentary: @@ -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)