From: teranisi <teranisi>
Date: Tue, 19 Feb 2002 08:52:29 +0000 (+0000)
Subject: * wl-message.el (wl-message-add-buttons-to-header): Eliminated needless
X-Git-Tag: wl-2_9_8~47
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=c576d1556bd4ca6acfc8af6f21465c1de30b920f;p=elisp%2Fwanderlust.git

* wl-message.el (wl-message-add-buttons-to-header): Eliminated needless
 `goto-char'.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 8f5b900..1ab514c 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,5 +1,8 @@
 2002-02-19  Yuuichi Teranishi  <teranisi@gohome.org>
 
+	* wl-message.el (wl-message-add-buttons-to-header): Eliminated
+	needless `goto-char'.
+
 	* wl-summary.el (wl-summary-set-message-buffer-or-redisplay): Call
 	`wl-summary-redisplay-no-mime-internal' instead of
 	`wl-summary-redisplay-no-mime'.
diff --git a/wl/wl-message.el b/wl/wl-message.el
index 88102f4..775758b 100644
--- a/wl/wl-message.el
+++ b/wl/wl-message.el
@@ -403,7 +403,6 @@ Returns non-nil if bottom of message."
 			(point-max)))
 	    (goto-char start)
 	    (while (re-search-forward (nth 1 entry) end t)
-	      (goto-char (match-end 0))
 	      (wl-message-add-button
 	       (match-beginning (nth 2 entry))
 	       (match-end (nth 2 entry))