From 5c0ecbb8cc970d3a651f4dafe909a299a9660786 Mon Sep 17 00:00:00 2001 From: bg66 Date: Tue, 9 Dec 2008 08:12:29 +0000 Subject: [PATCH] * mixi-gnus.el (toplevel): Avoid warnings when compiling. * mixi.el (mixi-diary-title-regexp): Follow the change of mixi. --- ChangeLog | 6 ++++++ mixi-gnus.el | 5 +++++ mixi.el | 4 ++-- 3 files changed, 13 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index 4c34714..35c06e0 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +2008-12-09 OHASHI Akira + + * mixi-gnus.el (toplevel): Avoid warnings when compiling. + + * mixi.el (mixi-diary-title-regexp): Follow the change of mixi. + 2008-11-12 OHASHI Akira * mixi-el: Version 2.1.0 released. diff --git a/mixi-gnus.el b/mixi-gnus.el index 1d00893..abaa167 100644 --- a/mixi-gnus.el +++ b/mixi-gnus.el @@ -37,6 +37,11 @@ (require 'mixi-utils) (require 'message) +;; Functions and variables which should be defined in the other module +;; at run-time. +(eval-when-compile + (defvar message-bogus-addresses)) + (defun message-mixi-p () "Say whether the current buffer contains a mixi message." (and (not message-this-is-news) diff --git a/mixi.el b/mixi.el index bf82c9a..6b6bd2e 100644 --- a/mixi.el +++ b/mixi.el @@ -138,7 +138,7 @@ (autoload 'w3m-retrieve "w3m") (autoload 'url-retrieve-synchronously "url")) -(defconst mixi-revision "$Revision: 1.200 $") +(defconst mixi-revision "$Revision: 1.201 $") (defgroup mixi nil "API library for accessing to mixi." @@ -1210,7 +1210,7 @@ Increase this value when unexpected error frequently occurs."

\\(.+?\\)\\(¤µ¤ó\\)?¤ÎÆüµ­

") (defconst mixi-diary-title-regexp "
-
+
\\([^<\n]+\\)\\(\\)?") (defconst mixi-diary-time-regexp "
\\([0-9]+\\)ǯ\\([0-9]+\\)·î\\([0-9]+\\)Æü\\([0-9]+\\):\\([0-9]+\\)
") -- 1.7.10.4