+(defconst shimbun-mixi-default-group-alist
+ '(("new-diaries" . mixi-get-new-diaries)
+ ("new-comments" . mixi-get-new-comments)
+ ("new-bbses" . mixi-get-new-bbses)
+ ("new-bbs-comments" . mixi-get-new-bbs-comments)
+ ("messages" . mixi-get-messages)
+ ("messages.sent" .
+ (lambda (range)
+ (mixi-get-messages 'outbox range)))
+ ("logs" . mixi-get-logs)
+ ("my-diaries" . "/home.pl")
+ ("mixi-el" . "/view_community.pl?id=1596390")
+ ("news.newest.domestic" .
+ (lambda (range)
+ (mixi-get-news 'domestic 'newest range)))
+ ("news.newest.politics" .
+ (lambda (range)
+ (mixi-get-news 'politics 'newest range)))
+ ("news.newest.economy" .
+ (lambda (range)
+ (mixi-get-news 'economy 'newest range)))
+ ("news.newest.area" .
+ (lambda (range)
+ (mixi-get-news 'area 'newest range)))
+ ("news.newest.abroad" .
+ (lambda (range)
+ (mixi-get-news 'abroad 'newest range)))
+ ("news.newest.sports" .
+ (lambda (range)
+ (mixi-get-news 'sports 'newest range)))
+ ("news.newest.entertainment" .
+ (lambda (range)
+ (mixi-get-news 'entertainment '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.politics" .
+ (lambda (range)
+ (mixi-get-news 'politics 'pickup range)))
+ ("news.pickup.economy" .
+ (lambda (range)
+ (mixi-get-news 'economy 'pickup range)))
+ ("news.pickup.area" .
+ (lambda (range)
+ (mixi-get-news 'area 'pickup range)))
+ ("news.pickup.abroad" .
+ (lambda (range)
+ (mixi-get-news 'abroad 'pickup range)))
+ ("news.pickup.sports" .
+ (lambda (range)
+ (mixi-get-news 'sports 'pickup range)))
+ ("news.pickup.entertainment" .
+ (lambda (range)
+ (mixi-get-news 'entertainment 'pickup range)))
+ ("news.pickup.it" .
+ (lambda (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)))
+ ("releases" . mixi-get-releases))
+ "An alist of mixi shimbun group default definition.")
+
+(defcustom shimbun-mixi-group-alist nil