@code{elmo-split-rule} \e$B$N\e(B @samp{CONDITION} \e$B$H$7$F;XDj=PMh$k4X?t$K\e(B
@code{spam-p} \e$B$,DI2C$5$l$^$9!#$3$N4X?t$O!"BP>]$N%a%C%;!<%8$,\e(B spam \e$B$HH=Dj\e(B
\e$B$5$l$?;~$K??$H$J$j$^$9!#\e(B
+@xref{Split messages}
\e$B0J2<$KNc$r<($7$^$9!#\e(B
@subsection \e$B%+%9%?%^%$%:JQ?t\e(B
@table @code
-@item wl-spam-folder-name
-@vindex wl-spam-folder-name
+@item wl-spam-folder
+@vindex wl-spam-folder
spam \e$B$HH=Dj$5$l$?%a%C%;!<%8$r0\F0$9$k%U%)%k%@L>$r@_Dj$7$^$9!#\e(B
\e$B=i4|@_Dj$O!"\e(B@samp{+spam}\e$B!#\e(B
+2003-11-30 Hiroya Murata <lapis-lazuli@pop06.odn.ne.jp>
+
+ * wl-spam.el (wl-spam-folder): Renamed from `wl-spam-folder-name'.
+
2003-11-29 Hiroya Murata <lapis-lazuli@pop06.odn.ne.jp>
* wl-message.el (wl-message-buffer-cur-summary-buffer): Remove
"Spam configuration for wanderlust."
:group 'wl)
-(defcustom wl-spam-folder-name "+spam"
+(defcustom wl-spam-folder "+spam"
"*Spam folder."
:type 'string
:group 'wl-spam)
:group 'wl-spam)
(defun wl-spam-domain (folder-name)
- (cond ((string= folder-name wl-spam-folder-name)
+ (cond ((string= folder-name wl-spam-folder)
'spam)
((wl-string-match-member folder-name
wl-spam-undecided-folder-regexp-list)
(eq domain 'good)))
(message "Registering spam...done"))
(wl-summary-move-mark-list-messages mark-list
- wl-spam-folder-name
+ wl-spam-folder
"Refiling spam...")))
(defun wl-summary-exec-action-refile-with-register (mark-list)
(when (elmo-spam-message-spam-p (elmo-spam-processor)
wl-summary-buffer-elmo-folder
(elmo-message-entity-number entity))
- wl-spam-folder-name))
+ wl-spam-folder))
(defun wl-spam-setup ()
(add-hook 'wl-summary-prepared-hook #'wl-summary-auto-check-spam)