From 05c05218e94d852aa0315c0bb3a62d5fbbd6c68c Mon Sep 17 00:00:00 2001 From: kaoru Date: Sun, 6 May 2001 13:04:28 +0000 Subject: [PATCH] Fix typo. --- samples/en/dot.wl | 10 +++++----- samples/ja/dot.wl | 10 +++++----- 2 files changed, 10 insertions(+), 10 deletions(-) diff --git a/samples/en/dot.wl b/samples/en/dot.wl index 5abb93f..fae11b0 100644 --- a/samples/en/dot.wl +++ b/samples/en/dot.wl @@ -143,10 +143,10 @@ ;;; [[ Special Setting ]] ;; open unread group folder after checking. -(add-hook 'wl-folder-check-entity-hook - '(lambda () - (wl-folder-open-unread-folder entity) - )) +;(add-hook 'wl-folder-check-entity-hook +; '(lambda () +; (wl-folder-open-unread-folder entity) +; )) ;; Change summary display function. @@ -199,7 +199,7 @@ ;; non-verbose User-Agent: field -;(setq wl-generate-mailer-string-function +;(setq wl-generate-mailer-string-func ; (function ; (lambda () ; (wl-generate-user-agent-string-1 nil)))) diff --git a/samples/ja/dot.wl b/samples/ja/dot.wl index 589f110..1da377f 100644 --- a/samples/ja/dot.wl +++ b/samples/ja/dot.wl @@ -145,10 +145,10 @@ ;;; [[ 特殊な設定 ]] ;; グループをcheckした後に未読があるフォルダのグループを自動的に開く -(add-hook 'wl-folder-check-entity-hook - '(lambda () - (wl-folder-open-unread-folder entity) - )) +;(add-hook 'wl-folder-check-entity-hook +; '(lambda () +; (wl-folder-open-unread-folder entity) +; )) ;; サマリ表示関数を変更する @@ -204,7 +204,7 @@ ;; 短い User-Agent: フィールドを使う -;(setq wl-generate-mailer-string-function +;(setq wl-generate-mailer-string-func ; (function ; (lambda () ; (wl-generate-user-agent-string-1 nil)))) -- 1.7.10.4