From: yoichi <yoichi>
Date: Sat, 26 Jul 2003 11:26:58 +0000 (+0000)
Subject: * wl-action.el (wl-summary-target-mark-region): Remove duplicate definition.
X-Git-Tag: wl-2_11_5~33
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=91ad6a8c255d10a83cf0b8f4684e7710ae2b1777;p=elisp%2Fwanderlust.git

* wl-action.el (wl-summary-target-mark-region): Remove duplicate definition.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 8eacda9..30ed0a6 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,6 +1,7 @@
 2003-07-26  Yoichi NAKAYAMA  <yoichi@geiin.org>
 
 	* wl-action.el (wl-summary-action-docstring): Add more info.
+	(wl-summary-target-mark-region): Remove duplicate definition.
 
 2003-07-24  Yuuichi Teranishi  <teranisi@gohome.org>
 
diff --git a/wl/wl-action.el b/wl/wl-action.el
index 7bd0967..bfbf3ed 100644
--- a/wl/wl-action.el
+++ b/wl/wl-action.el
@@ -31,6 +31,9 @@
 
 (require 'wl-summary)
 
+(eval-when-compile
+  (defalias-maybe 'wl-summary-target-mark-region 'ignore))
+
 (defsubst wl-summary-action-mark (action)
   (nth 0 action))
 (defsubst wl-summary-action-symbol (action)
@@ -898,10 +901,6 @@ If optional argument NUMBER is specified, mark message specified by NUMBER."
 	  (funcall function (wl-summary-message-number) data)
 	  (forward-line 1))))))
 
-(defun wl-summary-target-mark-region (beg end)
-  (interactive "r")
-  (wl-summary-mark-region-subr 'wl-summary-target-mark beg end nil))
-
 (defun wl-summary-target-mark-all ()
   (interactive)
   (wl-summary-target-mark-region (point-min) (point-max))