* mixi.el (mixi-news-category-list): Add game-anime and column.

* sb-mixi.el (shimbun-mixi-default-group-alist): Support them.

diff --git a/ChangeLog b/ChangeLog
index c576ff0..c25d630 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2007-12-29  OHASHI Akira  <bg66@koka-in.org>
+
+       * mixi.el (mixi-news-category-list): Add game-anime and column.
+       * sb-mixi.el (shimbun-mixi-default-group-alist): Support them.
+

 2007-12-26  OHASHI Akira  <bg66@koka-in.org>
 
        * mixi-el: Version 1.1.0 released.
 2007-12-26  OHASHI Akira  <bg66@koka-in.org>
 
        * mixi-el: Version 1.1.0 released.

diff --git a/mixi-ja.texi b/mixi-ja.texi
index f610765..3621c9e 100755 (executable)
--- a/mixi-ja.texi
+++ b/mixi-ja.texi
@@ -1079,6 +1079,10 @@ friend \e$B%*%V%8%'%/%H$H?tCM$OF1;~$K;XDj$9$k$3$H$b$G$-$^$9!#\e(B
 \e$B%(%s%?!<%F%$%s%a%s%H\e(B
 @item IT
 IT\e$B!&%F%/%N%m%8!<\e(B
 \e$B%(%s%?!<%F%$%s%a%s%H\e(B
 @item IT
 IT\e$B!&%F%/%N%m%8!<\e(B

+@item game-anime
+\e$B%2!<%`!&%"%K%a\e(B
+@item column
+\e$B%3%i%`\e(B

 @end table
 @var{sort} \e$B$O<oN`$rI=$90J2<$N$$$:$l$+$r;XDj$7$F$/$@$5$$!#\e(B
 @table @asis
 @end table
 @var{sort} \e$B$O<oN`$rI=$90J2<$N$$$:$l$+$r;XDj$7$F$/$@$5$$!#\e(B
 @table @asis

diff --git a/mixi.el b/mixi.el
index 4f708cf..b0ee69e 100644 (file)
--- a/mixi.el
+++ b/mixi.el
@@ -138,7 +138,7 @@
   (autoload 'w3m-retrieve "w3m")
   (autoload 'url-retrieve-synchronously "url"))
 
   (autoload 'w3m-retrieve "w3m")
   (autoload 'url-retrieve-synchronously "url"))
 

-(defconst mixi-revision "$Revision: 1.178 $")
+(defconst mixi-revision "$Revision: 1.179 $")

 
 (defgroup mixi nil
   "API library for accessing to mixi."
 
 (defgroup mixi nil
   "API library for accessing to mixi."

@@ -2949,7 +2949,8 @@ Increase this value when unexpected error frequently occurs."
   (aset (cdr news) 6 content))
 
 (defconst mixi-news-category-list '(domestic politics economy area abroad
   (aset (cdr news) 6 content))
 
 (defconst mixi-news-category-list '(domestic politics economy area abroad

-                                            sports entertainment IT))
+                                            sports entertainment IT game-anime
+                                            column))

 
 (defmacro mixi-news-category-p (category)
   `(memq ,category mixi-news-category-list))
 
 (defmacro mixi-news-category-p (category)
   `(memq ,category mixi-news-category-list))

diff --git a/sb-mixi.el b/sb-mixi.el
index 0b2feb0..e6b04e5 100644 (file)
--- a/sb-mixi.el
+++ b/sb-mixi.el
@@ -33,7 +33,7 @@
 (require 'mixi-utils)
 (require 'shimbun)
 
 (require 'mixi-utils)
 (require 'shimbun)
 

-(defconst shimbun-mixi-revision "$Revision: 1.60 $")
+(defconst shimbun-mixi-revision "$Revision: 1.61 $")

 
 (eval-and-compile
   (luna-define-class shimbun-mixi (shimbun) (comment-cache))
 
 (eval-and-compile
   (luna-define-class shimbun-mixi (shimbun) (comment-cache))

@@ -75,6 +75,12 @@
     ("news.newest.it" .
      (lambda (range)
        (mixi-get-news 'IT 'newest range)))
     ("news.newest.it" .
      (lambda (range)
        (mixi-get-news 'IT 'newest range)))

+    ("news.newest.game-anime" .
+     (lambda (range)
+       (mixi-get-news 'game-anime 'newest range)))
+    ("news.newest.column" .
+     (lambda (range)
+       (mixi-get-news 'column 'newest range)))

     ("news.pickup.domestic" .
      (lambda (range)
        (mixi-get-news 'domestic 'pickup range)))
     ("news.pickup.domestic" .
      (lambda (range)
        (mixi-get-news 'domestic 'pickup range)))

@@ -98,7 +104,13 @@
        (mixi-get-news 'entertainment 'pickup range)))
     ("news.pickup.it" .
      (lambda (range)
        (mixi-get-news 'entertainment 'pickup range)))
     ("news.pickup.it" .
      (lambda (range)

-       (mixi-get-news 'IT 'pickup range))))
+       (mixi-get-news 'IT 'pickup range)))
+    ("news.pickup.game-anime" .
+     (lambda (range)
+       (mixi-get-news 'game-anime 'pickup range)))
+    ("news.pickup.column" .
+     (lambda (range)
+       (mixi-get-news 'column 'pickup range))))

   "An alist of mixi shimbun group default definition.")
 
 (defcustom shimbun-mixi-group-alist nil
   "An alist of mixi shimbun group default definition.")
 
 (defcustom shimbun-mixi-group-alist nil