From: okazaki <okazaki>
Date: Fri, 22 Apr 2005 08:20:55 +0000 (+0000)
Subject: (wl-summary-test-spam): Fix typo.
X-Git-Tag: wl-2_15_3~80
X-Git-Url: http://git.chise.org/gitweb/?p=elisp%2Fwanderlust.git;a=commitdiff_plain;h=592b10f14aa197a0f281179ed40b20b1ec1af684

(wl-summary-test-spam): Fix typo.
(wl-message-check-spam): Ditto.
---

diff --git a/wl/wl-spam.el b/wl/wl-spam.el
index 690242b..6f549ff 100644
--- a/wl/wl-spam.el
+++ b/wl/wl-spam.el
@@ -182,11 +182,11 @@ See `wl-summary-mark-action-list' for the detail of element."
   (let ((folder (or folder wl-summary-buffer-elmo-folder))
 	(number (or number (wl-summary-message-number)))
 	spam)
-    (message "Cheking spam...")
+    (message "Checking spam...")
     (when (setq spam (elmo-spam-message-spam-p (elmo-spam-processor)
 					       folder number))
       (wl-summary-spam number))
-    (message "Cheking spam...done")
+    (message "Checking spam...done")
     (when (interactive-p)
       (message "No: %d is %sa spam message." number (if spam "" "not ")))))
 
@@ -318,11 +318,11 @@ See `wl-summary-mark-action-list' for the detail of element."
   (let ((original (wl-message-get-original-buffer))
 	(number wl-message-buffer-cur-number)
 	spam)
-    (message "Cheking spam...")
+    (message "Checking spam...")
     (when (setq spam (elmo-spam-buffer-spam-p (elmo-spam-processor) original))
       (with-current-buffer wl-message-buffer-cur-summary-buffer
 	(wl-summary-spam number)))
-    (message "Cheking spam...done")
+    (message "Checking spam...done")
     (message "No: %d is %sa spam message." number (if spam "" "not "))))
 
 (defun wl-refile-guess-by-spam (entity)