From 75d3483bfd4e9bb61dead0631a805bee37a3cd1f Mon Sep 17 00:00:00 2001 From: bg66 Date: Tue, 9 Jan 2007 04:38:31 +0000 Subject: [PATCH] * mixi-gnus.el (message-mixi-p): Simplify. --- ChangeLog | 4 ++++ mixi-gnus.el | 13 ++++++------- 2 files changed, 10 insertions(+), 7 deletions(-) diff --git a/ChangeLog b/ChangeLog index 6012e77..e963711 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,9 @@ 2007-01-09 OHASHI Akira + * mixi-gnus.el (message-mixi-p): Simplify. + +2007-01-09 OHASHI Akira + * mixi.el (mixi-event-comment-list-regexp): Fix regexp. 2007-01-09 OHASHI Akira diff --git a/mixi-gnus.el b/mixi-gnus.el index 2397ddc..5557ea4 100644 --- a/mixi-gnus.el +++ b/mixi-gnus.el @@ -40,13 +40,12 @@ (defun message-mixi-p () "Say whether the current buffer contains a mixi message." (and (not message-this-is-news) - (or message-this-is-mail - (save-excursion - (save-restriction - (message-narrow-to-headers) - (or (message-fetch-field "mixi") - (string-match shimbun-mixi-to-regexp - (message-fetch-field "to")))))))) + (save-excursion + (save-restriction + (message-narrow-to-headers) + (or (message-fetch-field "mixi") + (string-match shimbun-mixi-to-regexp + (message-fetch-field "to"))))))) (defun message-send-via-mixi (arg) "Send the current message via mixi." -- 1.7.10.4