From: 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/cgi-bin/gitweb.cgi?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 * wl-action.el (wl-summary-action-docstring): Add more info. + (wl-summary-target-mark-region): Remove duplicate definition. 2003-07-24 Yuuichi Teranishi 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))