From: yoichi Date: Fri, 14 Dec 2001 11:21:31 +0000 (+0000) Subject: escape "." in wl-refile-rule-alist and wl-draft-config-alist. X-Git-Tag: wl-2_8-root~3 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=e376451257f75ae0c0472d93c8a028d49dab4c9a;p=elisp%2Fwanderlust.git escape "." in wl-refile-rule-alist and wl-draft-config-alist. (Reported by KURODA Chihiro ) --- diff --git a/samples/en/dot.wl b/samples/en/dot.wl index 8d5681f..62bedd0 100644 --- a/samples/en/dot.wl +++ b/samples/en/dot.wl @@ -257,9 +257,9 @@ ;; Change headers in draft sending time. (setq wl-draft-config-alist '((reply ;; see reply buffer - "^To: .*\\(test-notsend-wl@lists.airs.net\\)" + "^To: .*test-notsend-wl@lists\\.airs\\.net" (template . "default")) ;; template - ("^To: .*\\(test-notsend-wl@lists.airs.net\\)" + ("^To: .*test-notsend-wl@lists\\.airs\\.net" wl-ml-draft-config-function ;; function ("From" . wl-from) ;; variable ("Organization" . "~/.wl sample")) ;; string @@ -353,7 +353,7 @@ ; ("^Wanderlust" . "+wl") ; ("^Elisp" . "+elisp")) ; ("From" -; ("teranisi@isl.ntt.co.jp" . "+teranisi")))) +; ("foo@example\\.com" . "+foo")))) ;; Marks to skip auto-refile (default is "N" "U" "!"). ;; nil means all message is auto-refiled. diff --git a/samples/ja/dot.wl b/samples/ja/dot.wl index 4897fda..fbfa3cd 100644 --- a/samples/ja/dot.wl +++ b/samples/ja/dot.wl @@ -258,9 +258,9 @@ ;; 動的に変更する (setq wl-draft-config-alist '((reply ;; 返信元のバッファを見る - "^To: .*\\(test-notsend-wl@lists.airs.net\\)" + "^To: .*test-notsend-wl@lists\\.airs\\.net" (template . "default")) ; テンプレート - ("^To: .*\\(test-notsend-wl@lists.airs.net\\)" + ("^To: .*test-notsend-wl@lists\\.airs\\.net" wl-ml-draft-config-function ; 関数 ("From" . wl-from) ; 変数 ("Organization" . "~/.wl sample")) ; 文字列 @@ -361,7 +361,7 @@ ; ("^Wanderlust" . "+wl") ; ("^Elisp" . "+elisp")) ; ("From" -; ("teranisi@isl.ntt.co.jp" . "+teranisi")))) +; ("foo@example\\.com" . "+foo")))) ;; 自動リファイルしない永続マークを設定 ;; 標準では "N" "U" "!" になっており、未読メッセージを自動リファイルし