From 65470b041160f4a5811eba794ef2645bbfc662c7 Mon Sep 17 00:00:00 2001 From: bg66 Date: Sat, 30 Jan 2010 00:50:48 +0000 Subject: [PATCH] * mixi.el (mixi-friend-nick-regexp): Follow the change of mixi. (mixi-realize-friend): Ditto. (mixi-diary-list-regexp): Ditto. --- ChangeLog | 6 ++++++ mixi.el | 12 +++++++----- 2 files changed, 13 insertions(+), 5 deletions(-) diff --git a/ChangeLog b/ChangeLog index dddd199..716c629 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +2010-01-29 KAMO Tomoyuki + + * mixi.el (mixi-friend-nick-regexp): Follow the change of mixi. + (mixi-realize-friend): Ditto. + (mixi-diary-list-regexp): Ditto. + 2010-01-12 KAMO Tomoyuki * mixi.el (mixi-my-id-regexp): Follow the change of mixi. diff --git a/mixi.el b/mixi.el index df86bdc..7efaedd 100644 --- a/mixi.el +++ b/mixi.el @@ -139,7 +139,7 @@ (autoload 'w3m-retrieve "w3m") (autoload 'url-retrieve-synchronously "url")) -(defconst mixi-revision "$Revision: 1.209 $") +(defconst mixi-revision "$Revision: 1.210 $") (defgroup mixi nil "API library for accessing to mixi." @@ -847,7 +847,7 @@ Increase this value when unexpected error frequently occurs." `(concat "/show_friend.pl?id=" (mixi-friend-id ,friend))) (defconst mixi-friend-nick-regexp - "

\\(.*\\)¤µ¤ó([0-9]+)\n") + "

\\(\\|\\)\\(.*\\)¤µ¤ó([0-9]+)\\(\\|\n\\)") (defconst mixi-friend-name-regexp "̾Á°\n+?\\(.+?\\)\\(\\)") (defconst mixi-friend-sex-regexp @@ -875,10 +875,12 @@ Increase this value when unexpected error frequently occurs." "Realize a FRIEND." ;; FIXME: Check an expiration of cache? (unless (mixi-object-realized-p friend) - (with-mixi-retrieve (mixi-friend-page friend) + (with-mixi-retrieve (if (equal friend mixi-me) + "/home.pl" + (mixi-friend-page friend)) (let ((case-fold-search t)) (if (re-search-forward mixi-friend-nick-regexp nil t) - (mixi-friend-set-nick friend (match-string 1)) + (mixi-friend-set-nick friend (match-string 2)) (mixi-realization-error 'cannot-find-nick friend)) (when (re-search-forward mixi-friend-name-regexp nil t) (mixi-friend-set-name friend (match-string 1))) @@ -1348,7 +1350,7 @@ Increase this value when unexpected error frequently occurs." (when ,friend (concat "&id=" (mixi-friend-id ,friend))))) (defconst mixi-diary-list-regexp - "

\\(\\|\\)\\(.*\\)\\(ÊÔ½¸¤¹¤ë\\|\\)
+ "
\\(\\|\\)\\(.*\\)\\(ÊÔ½¸¤¹¤ë\\|\\).*
\\([0-9]+\\)ǯ\\([0-9]+\\)·î\\([0-9]+\\)Æü\n?\\([0-9]+\\):\\([0-9]+\\)
") -- 1.7.10.4