* mixi.el (mixi-make-friend-from-url): Support my object.

diff --git a/ChangeLog b/ChangeLog
index db413ed..b701b72 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2006-11-09  OHASHI Akira  <bg66@koka-in.org>
+
+       * mixi.el (mixi-make-friend-from-url): Support my object.
+
 2006-11-08  OHASHI Akira  <bg66@koka-in.org>
 
        * mixi.el (mixi-friend-realize): Don't remove markup.

diff --git a/mixi.el b/mixi.el
index bf5e13a..c71f976 100644 (file)
--- a/mixi.el
+++ b/mixi.el
@@ -519,9 +519,11 @@ Increase this value when unexpected error frequently occurs."
 
 (defun mixi-make-friend-from-url (url)
   "Return a friend object from URL."
-  (when (string-match mixi-friend-url-regexp url)
-    (let ((id (match-string 1 url)))
-      (mixi-make-friend id))))
+  (if (string-match mixi-friend-url-regexp url)
+      (let ((id (match-string 1 url)))
+       (mixi-make-friend id))
+    (when (string-match "/home\\.pl" url)
+      (mixi-make-me))))
 
 (defmacro mixi-friend-p (friend)
   `(eq (mixi-object-class ,friend) 'mixi-friend))