Update.

diff --git a/doc/wl-ja.texi b/doc/wl-ja.texi
index e2a7594..599b37c 100644 (file)
--- a/doc/wl-ja.texi
+++ b/doc/wl-ja.texi
@@ -6185,9 +6185,9 @@ face \e$B$N@_Dj$O\e(B @file{.emacs} \e$B$K=q$/$3$H$O$G$-$J$$$N$G\e(B @file{~/.wl} \e$
 \e$B?7$7$$%a!<%k$,FO$$$?:]$K<B9T$5$l$k%U%C%/!#\e(B
 \e$BCe?.;~$K%S!<%W2;$rLD$i$9!J=i4|@_Dj!K$J$i0J2<$N$h$&$K@_Dj$7$^$9!#\e(B
 @lisp
-(setq wl-biff-notify-hook '(beep))
+(setq wl-biff-notify-hook '(ding))
 @end lisp
-\e$B2;$rLD$i$5$J$$>l9g$O\e(B @code{nil} \e$B$K@_Dj$7$F$/$@$5$$!#\e(B
+\e$B2;$rLD$i$7$?$j$7$J$$>l9g$O\e(B @code{nil} \e$B$K@_Dj$7$F$/$@$5$$!#\e(B
 @end table
 
 

diff --git a/doc/wl.texi b/doc/wl.texi
index 415e02f..fb230f4 100644 (file)
--- a/doc/wl.texi
+++ b/doc/wl.texi
@@ -6252,7 +6252,7 @@ Check mail arrival in this period.
 This hook is run at the arrival of new mail.
 To beep with mail arrival(initial setting), set as follows.
 @lisp
-(setq wl-biff-notify-hook '(beep))
+(setq wl-biff-notify-hook '(ding))
 @end lisp
 For silence, set to @code{nil}.
 @end table

diff --git a/samples/en/dot.wl b/samples/en/dot.wl
index c3a2f0d..bb3923f 100644 (file)
--- a/samples/en/dot.wl
+++ b/samples/en/dot.wl
@@ -75,16 +75,16 @@
 ;; Folder Carbon Copy
 ;(setq wl-fcc "+outbox")
 
-;; Confirm at exit time.
+;; Confirm before exitting Wanderlust.
 (setq wl-interactive-exit t)
 
-;; Confirm at message sending time.
+;; Confirm before sending message.
 (setq wl-interactive-send t)
 
 ;; Create opened thread.
 ;(setq wl-thread-insert-opened t)
 
-;; folder mode and summary mode is displayed at the same time. (3pane)
+;; Keep folder window beside summary. (3 pane)
 ;(setq wl-stay-folder-window t)
 
 ;; Open new frame for draft buffer.
@@ -97,7 +97,7 @@
 ;; Don't split large message.
 ;(setq mime-edit-split-message nil)
 
-;; Thread divide when change subject.
+;; Divide thread by change of subject.
 ;(setq wl-summary-divide-thread-when-subject-changed t)
 
 ;; Thread view
@@ -113,12 +113,16 @@
 ;; goto next folder when exit from summary.
 ;(setq wl-auto-select-next t)
 
-;; folder is skipped if there is no unread.
-;(setq wl-summary-next-no-unread 'skip-no-unread)
+;; skip folder if there is no unread message.
+;(setq wl-auto-select-next 'skip-no-unread)
 
 ;; jump to unread message in 'N' or 'P'.
 ;(setq wl-summary-move-order 'unread)
 
+;; notify mail arrival
+;(setq wl-biff-check-folder-list '("%inbox"))
+;(setq wl-biff-notify-hook '(ding))
+
 
 ;;; [[ Network ]]
 
@@ -182,7 +186,6 @@
                       (and sequence
                            (cadr (split-string sequence " ")))))
     (if (string-match
-;;;     "^\\s(\\(.+\\)[ :]\\([0-9]+\\)\\s)[ \t]*"
         "^\\s(\\(\\S)+\\)[ :]\\([0-9]+\\)\\s)[ \t]*"
         subject-string)
        (progn

diff --git a/samples/ja/dot.wl b/samples/ja/dot.wl
index c20958e..29cb473 100644 (file)
--- a/samples/ja/dot.wl
+++ b/samples/ja/dot.wl
@@ -119,6 +119,10 @@
 ;; \e$BL$FI%a%C%;!<%8$rM%@hE*$KFI$`\e(B
 ;(setq wl-summary-move-order 'unread)
 
+;; \e$BCe?.DLCN$N@_Dj\e(B
+;(setq wl-biff-check-folder-list '("%inbox"))
+;(setq wl-biff-notify-hook '(ding))
+
 
 ;;; [[ \e$B%M%C%H%o!<%/\e(B ]]
 
@@ -187,7 +191,6 @@
                       (and sequence
                            (cadr (split-string sequence " ")))))
     (if (string-match
-;;;     "^\\s(\\(.+\\)[ :]\\([0-9]+\\)\\s)[ \t]*"
         "^\\s(\\(\\S)+\\)[ :]\\([0-9]+\\)\\s)[ \t]*"
         subject-string)
        (progn