X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=mixi-atom.el;h=4cd250f9f12913340e84df7e6749c0d7f59e9c9b;hb=6f0347f9ea0b4a65df004ea48dd7c930a7e9e0cd;hp=3c955e927f52ba8c04b2955943544600591c396a;hpb=cb2d9ecc1352901421d0d85430bc3582038ba1cd;p=elisp%2Fmixi.git

diff --git a/mixi-atom.el b/mixi-atom.el
index 3c955e9..4cd250f 100644
--- a/mixi-atom.el
+++ b/mixi-atom.el
@@ -44,6 +44,11 @@
   :type 'string
   :group 'mixi)
 
+(defcustom mixi-atom-self ""
+  "*URI for retrieving Atom Feed Documents representing this Atom feed."
+  :type 'string
+  :group 'mixi)
+
 (defcustom mixi-atom-title "Mixi Feed"
   "*Title for feed."
   :type 'string
@@ -96,7 +101,8 @@ RANGE is the range for getting articles.  If RANGE is nil, get all articles."
 	  " <id>" (mixi-make-tag-uri object) "</id>\n"
 	  " <updated>" (mixi-atom-make-date (mixi-object-time object))
 	  "</updated>\n"
-	  " <summary>" (mixi-remove-markup (mixi-make-content object))
+	  " <summary>" (mixi-encode-specials-string
+			(mixi-remove-markup (mixi-make-content object)))
 	  "</summary>\n"
 	  "</entry>\n"))
 
@@ -121,6 +127,7 @@ RANGE is the range for getting articles.  If RANGE is nil, get all articles."
   (concat "<?xml version=\"1.0\" encoding=\""
 	  (symbol-name mixi-atom-coding-system) "\"?>\n"
 	  "<feed xmlns=\"" mixi-atom-namespace "\">\n"
+	  "<link rel=\"self\" href=\"" mixi-atom-self "\"/>\n"
 	  "\n"
 	  "<title>" mixi-atom-title "</title>\n"
 	  "<link href=\"" mixi-url "\"/>\n"