(wl-spam-setup): Bind "rkm" to wl-summary-spam-region and "tkm" to wl-thread-spam.

diff --git a/doc/wl-ja.texi b/doc/wl-ja.texi
index 5451e86..497b56e 100644 (file)
--- a/doc/wl-ja.texi
+++ b/doc/wl-ja.texi
@@ -7102,20 +7102,6 @@ non-spam \e$B$H$7$F$N3X=,$K2C$($F!"\e(Bspam \e$B$K9T$J$C$?3X=,$r:o=|$7$^$9!#\e(B
 \e$B%+!<%=%k9T$N%a%C%;!<%8$r%F%9%H$7!"\e(Bspam \e$B$HH=Dj$5$l$?>l9g$K\e(B spam \e$B%^!<%/$r\e(B
 \e$BIU$1$^$9!#\e(B
 
-@item r k c
-@kindex r k c (Summary)
-@findex wl-summary-test-spam-region
-\e$B;XDj%j!<%8%g%s$K$"$k%a%C%;!<%8$r%F%9%H$7!"\e(Bspam \e$B$HH=Dj$5$l$?>l9g$K\e(B spam \e$B%^!<%/$r\e(B
-\e$BIU$1$^$9!#\e(B
-
-@item t k c
-@kindex t k c (Summary)
-@findex wl-thread-test-spam
-\e$B%+!<%=%k9T$,$"$k%a%C%;!<%8$r@hF,$H$9$k%9%l%C%I$N%a%C%;!<%8$r%F%9%H$7!"\e(B
-spam \e$B$HH=Dj$5$l$?>l9g$K\e(B spam \e$B%^!<%/$rIU$1$^$9!#\e(B
-prefix argument \e$B$D$-$J$i$P%+!<%=%k9T$,$"$k%a%C%;!<%8$r4^$`%9%l%C%IA4$F$K\e(B
-\e$BE,MQ$7$^$9!#\e(B
-
 @item k C
 @kindex k C (Summary)
 @findex wl-summary-mark-spam
@@ -7144,6 +7130,32 @@ spam \e$B$+$I$&$+$N%F%9%H$r9T$$$^$9!#\e(Bspam \e$B$HH=Dj$5$l$?%a%C%;!<%8$K$O!"\e(Bsp
 @findex wl-summary-register-as-good-all
 \e$B%U%)%k%@Fb$NA4$F$N%a%C%;!<%8$r\e(B non-spam \e$B$H$7$FEPO?$7$^$9!#\e(B
 
+@item r k m
+@kindex r k m (Summary)
+@findex wl-summary-spam-region
+\e$B;XDj%j!<%8%g%s$K$"$k%a%C%;!<%8$K\e(B spam \e$B%^!<%/$rIU$1$^$9!#\e(B
+
+@item r k c
+@kindex r k c (Summary)
+@findex wl-summary-test-spam-region
+\e$B;XDj%j!<%8%g%s$K$"$k%a%C%;!<%8$r%F%9%H$7!"\e(Bspam \e$B$HH=Dj$5$l$?>l9g$K\e(B spam \e$B%^!<%/$r\e(B
+\e$BIU$1$^$9!#\e(B
+
+@item t k m
+@kindex t k m (Summary)
+@findex wl-thread-spam
+\e$B%+!<%=%k9T$,$"$k%a%C%;!<%8$r@hF,$H$9$k%9%l%C%I$N%a%C%;!<%8$K\e(B spam \e$B%^!<%/$rIU$1$^$9!#\e(B
+prefix argument \e$B$D$-$J$i$P%+!<%=%k9T$,$"$k%a%C%;!<%8$r4^$`%9%l%C%IA4$F$K\e(B
+\e$BE,MQ$7$^$9!#\e(B
+
+@item t k c
+@kindex t k c (Summary)
+@findex wl-thread-test-spam
+\e$B%+!<%=%k9T$,$"$k%a%C%;!<%8$r@hF,$H$9$k%9%l%C%I$N%a%C%;!<%8$r%F%9%H$7!"\e(B
+spam \e$B$HH=Dj$5$l$?>l9g$K\e(B spam \e$B%^!<%/$rIU$1$^$9!#\e(B
+prefix argument \e$B$D$-$J$i$P%+!<%=%k9T$,$"$k%a%C%;!<%8$r4^$`%9%l%C%IA4$F$K\e(B
+\e$BE,MQ$7$^$9!#\e(B
+
 @item m k
 @kindex m k (Summary)
 @findex wl-summary-target-mark-spam

diff --git a/doc/wl.texi b/doc/wl.texi
index b4f9a65..5dcf056 100644 (file)
--- a/doc/wl.texi
+++ b/doc/wl.texi
@@ -7159,18 +7159,6 @@ Put spam mark (@samp{s}) on current message.
 @findex wl-summary-test-spam
 Test current message and put spam mark if judged as spam.
 
-@item r k c
-@kindex r k c (Summary)
-@findex wl-summary-test-spam-region
-Test messages in the specified region and put spam mark if judged as spam.
-
-@item t k c
-@kindex t k c (Summary)
-@findex wl-thread-test-spam
-Test messages which are the descendant of the current thread and put spam mark
-if judged as spam.  With prefix argument, it affects on the all messages in
-the thread tree.
-
 @item k C
 @kindex k C (Summary)
 @findex wl-summary-mark-spam
@@ -7198,6 +7186,29 @@ Register current message as non-spam.
 @findex wl-summary-register-as-good-all
 Register all messages in the folder as non-spam.
 
+@item r k m
+@kindex r k m (Summary)
+@findex wl-summary-spam-region
+Put spam mark on messages in the specified region.
+
+@item r k c
+@kindex r k c (Summary)
+@findex wl-summary-test-spam-region
+Test messages in the specified region and put spam mark if judged as spam.
+
+@item t k m
+@kindex t k m (Summary)
+@findex wl-thread-spam
+Put spam mark on messages which are the descendant of the current thread.
+With prefix argument, it affects on the all messages in the thread tree.
+
+@item t k c
+@kindex t k c (Summary)
+@findex wl-thread-test-spam
+Test messages which are the descendant of the current thread and put spam mark
+if judged as spam.  With prefix argument, it affects on the all messages in
+the thread tree.
+
 @item m k
 @kindex m k (Summary)
 @findex wl-summary-target-mark-spam

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 5c92e21..98f63e5 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2006-12-08  Tetsurou Okazaki  <okazaki@be.to>
+
+       * wl-spam.el (wl-spam-setup): Bind "rkm" to wl-summary-spam-region and
+       "tkm" to wl-thread-spam.
+
 2006-12-02  Yoichi NAKAYAMA  <yoichi@geiin.org>
 
        * wl-thread.el (wl-thread-entity-insert-as-children): Use

diff --git a/wl/wl-spam.el b/wl/wl-spam.el
index 972bd74..8c94de0 100644 (file)
--- a/wl/wl-spam.el
+++ b/wl/wl-spam.el
@@ -393,8 +393,12 @@ See `wl-summary-mark-action-list' for the detail of element."
                  wl-summary-skip-mark-list))))
   (define-key wl-summary-mode-map "k" wl-summary-spam-map)
   (define-key
+    wl-summary-mode-map "rkm" 'wl-summary-spam-region)
+  (define-key
     wl-summary-mode-map "rkc" 'wl-summary-test-spam-region)
   (define-key
+    wl-summary-mode-map "tkm" 'wl-thread-spam)
+  (define-key
     wl-summary-mode-map "tkc" 'wl-thread-test-spam)
   (define-key
     wl-summary-mode-map "mk" 'wl-summary-target-mark-spam)