From: teranisi <teranisi>
Date: Mon, 2 Apr 2001 10:37:06 +0000 (+0000)
Subject: * sb-asahi.el (shimbun-index-url): Removed redundant '/' in URL string.
X-Git-Tag: wl-2_8-root^2~2
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=5b9110a1f6f4daee7aeff653ecf93c222fdcf7a2;p=elisp%2Fwanderlust.git

* sb-asahi.el (shimbun-index-url): Removed redundant '/' in URL string.
 (shimbun-get-headers): Ditto.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 0501cb2..b1deb7d 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,5 +1,8 @@
 2001-04-02  Yuuichi Teranishi  <teranisi@gohome.org>
 
+	* sb-asahi.el (shimbun-index-url): Removed redundant '/' in URL string.
+	(shimbun-get-headers): Ditto.
+
 	* elmo.el: Moved obsolete variable definitions from
 	elmo-imap4.el, elmo-nntp.el and elmo-pop3.el.
 
diff --git a/elmo/sb-asahi.el b/elmo/sb-asahi.el
index 3c390b3..9481192 100644
--- a/elmo/sb-asahi.el
+++ b/elmo/sb-asahi.el
@@ -45,7 +45,7 @@
 (defvar shimbun-asahi-content-end "\n<!-- End of kiji -->\n")
 
 (luna-define-method shimbun-index-url ((shimbun shimbun-asahi))
-  (format "%s/%s/update/list.html"
+  (format "%s%s/update/list.html"
 	  (shimbun-url-internal shimbun)
 	  (shimbun-current-group-internal shimbun)))
 
@@ -77,7 +77,7 @@
 				"\\(<[^>]+>\\|\r\\)")
 			       ""))
 		   (shimbun-from-address-internal shimbun)
-		   "" id "" 0 0 (format "%s/%s/update/%s"
+		   "" id "" 0 0 (format "%s%s/update/%s"
 					(shimbun-url-internal shimbun)
 					(shimbun-current-group-internal
 					 shimbun)