From e9d25e1ba703d450510f6351e87c805074434511 Mon Sep 17 00:00:00 2001 From: bg66 Date: Mon, 11 Dec 2006 08:22:31 +0000 Subject: [PATCH] * mixi.el (mixi-diary-time-regexp): Follow the change of mixi; Fix regexp. (mixi-diary-title-regexp): Ditto. (mixi-diary-content-regexp): Ditto. (mixi-diary-realize): Follow the change above. --- ChangeLog | 8 ++++++++ mixi.el | 20 ++++++++++---------- 2 files changed, 18 insertions(+), 10 deletions(-) diff --git a/ChangeLog b/ChangeLog index 4cdb26e..d54eff8 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,13 @@ 2006-12-11 OHASHI Akira + * mixi.el (mixi-diary-time-regexp): Follow the change of mixi; + Fix regexp. + (mixi-diary-title-regexp): Ditto. + (mixi-diary-content-regexp): Ditto. + (mixi-diary-realize): Follow the change above. + +2006-12-11 OHASHI Akira + * mixi.el (mixi-search-bbs-list-page): New macro. (mixi-search-bbs-list-regexp): New regexp. (mixi-search-bbses): New function. diff --git a/mixi.el b/mixi.el index 5598500..a274a2c 100644 --- a/mixi.el +++ b/mixi.el @@ -969,11 +969,11 @@ Increase this value when unexpected error frequently occurs." (defconst mixi-diary-owner-nick-regexp "\\(.+?\\)\\(¤µ¤ó\\)?¤ÎÆüµ­") (defconst mixi-diary-time-regexp - "\\([0-9]+\\)ǯ\\([0-9]+\\)·î\\([0-9]+\\)Æü
\\([0-9]+\\):\\([0-9]+\\)") + "\\([0-9]+\\)ǯ\\([0-9]+\\)·î\\([0-9]+\\)Æü\\(
\\|
\\)\\([0-9]+\\):\\([0-9]+\\)") (defconst mixi-diary-title-regexp - " \\([^<]+\\)") + " \\([^<]+\\)") (defconst mixi-diary-content-regexp - "\\(.*\\)") + "\\(.*\\)") (defun mixi-diary-realize (diary) "Realize a DIARY." @@ -987,17 +987,17 @@ Increase this value when unexpected error frequently occurs." (signal 'error (list 'cannot-find-owner-nick diary))) (if (string-match mixi-diary-time-regexp buffer) (mixi-diary-set-time - diary (encode-time 0 (string-to-number (match-string 5 buffer)) - (string-to-number (match-string 4 buffer)) - (string-to-number (match-string 3 buffer)) - (string-to-number (match-string 2 buffer)) - (string-to-number (match-string 1 buffer)))) + diary (encode-time 0 (string-to-number (match-string 10 buffer)) + (string-to-number (match-string 9 buffer)) + (string-to-number (match-string 7 buffer)) + (string-to-number (match-string 6 buffer)) + (string-to-number (match-string 5 buffer)))) (signal 'error (list 'cannot-find-time diary))) (if (string-match mixi-diary-title-regexp buffer) - (mixi-diary-set-title diary (match-string 1 buffer)) + (mixi-diary-set-title diary (match-string 2 buffer)) (signal 'error (list 'cannot-find-title diary))) (if (string-match mixi-diary-content-regexp buffer) - (mixi-diary-set-content diary (match-string 1 buffer)) + (mixi-diary-set-content diary (match-string 2 buffer)) (signal 'error (list 'cannot-find-content diary))))) (mixi-object-touch diary))) -- 1.7.10.4