From ea7fbcf0f2640f117515ef1695f68135e3ebc591 Mon Sep 17 00:00:00 2001 From: bg66 Date: Wed, 26 Sep 2007 12:21:25 +0000 Subject: [PATCH] (shimbun-get-headers): Use `shimbun-header-index-pages'. --- ChangeLog | 4 ++++ mixi.el | 2 +- sb-mixi.el | 6 ++++-- 3 files changed, 9 insertions(+), 3 deletions(-) diff --git a/ChangeLog b/ChangeLog index 5d844dc..7c7bc0d 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +2007-09-26 OHASHI Akira + + * sb-mixi.el (shimbun-get-headers): Use `shimbun-header-index-pages'. + 2007-09-25 OHASHI Akira * mixi.el (mixi-topic-content-regexp): Fix regexp. diff --git a/mixi.el b/mixi.el index 0ed517d..0f403de 100644 --- a/mixi.el +++ b/mixi.el @@ -1,6 +1,6 @@ ;; mixi.el --- API libraries for accessing to mixi -*- coding: euc-jp -*- -;; Copyright (C) 2005,2006,2007 OHASHI Akira +;; Copyright (C) 2005, 2006, 2007 OHASHI Akira ;; Author: OHASHI Akira ;; Keywords: hypermedia diff --git a/sb-mixi.el b/sb-mixi.el index fa07016..6aaff8d 100644 --- a/sb-mixi.el +++ b/sb-mixi.el @@ -1,6 +1,6 @@ ;;; sb-mixi.el --- shimbun backend for mixi -;; Copyright (C) 2006 OHASHI Akira +;; Copyright (C) 2006, 2007 OHASHI Akira ;; Author: OHASHI Akira ;; Keywords: news @@ -192,7 +192,9 @@ of mixi object." &optional range) (let ((url-or-function (cdr (assoc (shimbun-current-group-internal shimbun) (shimbun-mixi-group-alist)))) - (range (when (integerp range) (* range shimbun-mixi-page-articles)))) + (pages (shimbun-header-index-pages range))) + (when (integerp pages) + (setq range (* pages shimbun-mixi-page-articles))) (shimbun-sort-headers (shimbun-mixi-get-headers shimbun (mixi-make-objects url-or-function range) -- 1.7.10.4