From 1f4c81684efb3c9048e1ed77106c22d3a6c883b7 Mon Sep 17 00:00:00 2001 From: bg66 Date: Thu, 14 Dec 2006 09:26:20 +0000 Subject: [PATCH] * mixi.el (mixi-friend-nick-regexp): Follow the change of mixi. (mixi-friend-realize): Ditto. --- ChangeLog | 5 +++++ mixi.el | 5 +++-- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index 38f8ab8..341783b 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,10 @@ 2006-12-14 OHASHI Akira + * mixi.el (mixi-friend-nick-regexp): Follow the change of mixi. + (mixi-friend-realize): Ditto. + +2006-12-14 OHASHI Akira + * mixi.el (mixi-object-p): Check whether class is symbol. (mixi-read-object): New function. (mixi-cache-file-regexp): New regexp. diff --git a/mixi.el b/mixi.el index d998774..266e4b5 100644 --- a/mixi.el +++ b/mixi.el @@ -692,7 +692,7 @@ Increase this value when unexpected error frequently occurs." `(concat "/show_friend.pl?id=" (mixi-friend-id ,friend))) (defconst mixi-friend-nick-regexp - "\"\\*\"
\n\\(.*\\)¤µ¤ó([0-9]+)") + "\"\\*\"
?\n\\(.*\\)¤µ¤ó([0-9]+)") (defconst mixi-friend-name-sex-regexp "̾\\( \\| \\)Á°\n+\\([^<]+\\) (\\([Ã˽÷]\\)À­)") (defconst mixi-friend-address-regexp @@ -726,7 +726,8 @@ Increase this value when unexpected error frequently occurs." (signal 'error (list 'cannot-find-nick friend))) ;; For getting my profile. (unless (string-match mixi-friend-name-sex-regexp buf) - (with-mixi-retrieve "/show_profile.pl" + (with-mixi-retrieve (concat "/show_profile.pl?id=" + (mixi-friend-id friend)) (setq buf buffer))) (if (string-match mixi-friend-name-sex-regexp buf) (progn -- 1.7.10.4