X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;ds=sidebyside;f=elmo%2Felmo-shimbun.el;h=68da0287c0f6323ed4c1612b0500918a3ad67b0c;hb=f99a54273844588779955992f0d05d37536bceb5;hp=49b1381a455324e6e31cb4b872ba4599dffaac54;hpb=8b8f105e52cd4f1d2fc89dc09b462491721a878e;p=elisp%2Fwanderlust.git

diff --git a/elmo/elmo-shimbun.el b/elmo/elmo-shimbun.el
index 49b1381..68da028 100644
--- a/elmo/elmo-shimbun.el
+++ b/elmo/elmo-shimbun.el
@@ -230,14 +230,14 @@ If it is the symbol `all', update overview for all shimbun folders."
      (elmo-shimbun-folder-shimbun-internal folder)
      (elmo-shimbun-folder-group-internal folder))
     (let ((inhibit-quit t))
-      (unless (elmo-map-folder-location-alist-internal folder)
-	(elmo-map-folder-location-setup
+      (unless (elmo-location-map-alist folder)
+	(elmo-location-map-setup
 	 folder
 	 (elmo-msgdb-location-load (elmo-folder-msgdb-path folder))))
       (when (and (elmo-folder-plugged-p folder)
 		 (elmo-shimbun-headers-check-p folder))
 	(elmo-shimbun-get-headers folder)
-	(elmo-map-folder-update-locations
+	(elmo-location-map-update
 	 folder
 	 (elmo-map-folder-list-message-locations folder))))))