7. ドラフトバッファ

[ ? ]

7.1.2 メッセージの編集と送信

説明するまでもないですが、メッセージ本文の編集は基本的に通常の文章作成と同様に行ないます。本文は ‘--text follows this line--’ の行より下に記述します。(注意： ‘--text follows this line--’ の行はいじらないで下さい。)

マルチパートの編集は SEMI の MIME 編集モードを利用しています。編集の方法については各パッケージ付属のドキュメントを参照してください。 See (mime-ui-ja)MIME-Edit section ‘MIME-Edit’ in a MIME user interface for GNU Emacs. また、ドラフトバッファにおいて、C-c C-x ? でヘルプが参照できます。

編集中のドラフトをセーブすると、wl-draft-folder で設定したドラフトフォルダに追加されます。C-c C-z (wl-draft-save-and-exit) により、後から編集できるようにそれをセーブした上でドラフトバッファを離脱できます。

メッセージの編集が完了したら、C-c C-c で送信できます。

[ < ]

[ > ]

[ << ]

[上]

[ >> ]

[ ? ]

7.1.3 メッセージの動的な変更

wl-draft-config-alist を設定すると、ヘッダやその他の情報に基づいて、自動的に他のヘッダや本文を変更することができます。

変数 wl-draft-config-alist について説明します。この変数の初期設定は nil です。

例えば以下のように設定すると、wl-draft-send-and-exit や wl-draft-send を実行した時にヘッダが変更されます。 wl-interactive-send を non-nil に設定しておくと、送信前に変更点が確認できるので安心です。

(setq wl-draft-config-alist
      '(((string-match "aaa\\.example\\.com$" (system-name))
         ;; 式がnon-nilなら適用する
         (wl-smtp-posting-server . "mailserver-B")
         (wl-nntp-posting-server . "newsserver-B")
         ;; 一時的な変数の設定
         )
        ("^To: .*user@aaa\\.bbb\\.example\\.com"
         ;; ドラフトバッファのヘッダにマッチすれば適用する
         ("Organization" . (format "Go %s" my-webpage)))
                           ;; elisp 式が書ける (eval しているだけ)
         (top . "  ○○です。\n")    ;; 本文先頭へ文字列を挿入します
         (bottom . "\n以上です。\n") ;; 本文末尾へ文字列を挿入します
        ))

wl-draft-config-alist は次の形式になっています。

'((ヘッダの正規表現 または elisp式
   ("Field" . 値(elisp式))
   (variable . 値(elisp式))
   (サブ関数 . 値(elisp式))
   関数
   …)
  (ヘッダの正規表現 または elisp式
   ("Field" . 値(elisp式))
   …))

[サブ関数]には、デフォルトで以下の13個を用意しています。

'header:      ヘッダの末尾に指定した文字列を挿入します。
'header-top:  ヘッダの先頭に指定した文字列を挿入します。
'header-file: ヘッダの末尾に指定したファイルを挿入します。
'x-face:      指定したファイルの内容を持つ ‘X-Face:’ フィールドを
              挿入します。
'top:         本文の先頭に指定した文字列を挿入します。
'top-file:    本文の先頭に指定したファイルを挿入します。
'body:        本文を指定した文字列に置き換えます。
              nil を指定すると本文の文字列を削除します。
'body-file:   本文を指定したファイルの内容で置き換えます。
'bottom:      本文の末尾に指定した文字列を挿入します。
'bottom-file: 本文の末尾に指定したファイルを挿入します。
'part-top:    現在のマルチパートの先頭に指定した文字列を挿入します。
'part-bottom: 現在のマルチパートの末尾に指定した文字列を挿入します。
'template:    指定したテンプレートを適用します。
              (次項 テンプレートの挿入参照)

また、これらを定義しているのは wl-draft-config-sub-func-alist であり、定義を変更したり自分で作った関数を追加することができます。関数の書き方はここで説明するより直接コードを見た方が分かりやすいでしょうから、省略します。

各要素の1番目には ヘッダの正規表現 か elisp 式を指定します。elisp 式の場合は評価した値が non-nil の場合に適用されます。

また、デフォルトでは複数の要素がマッチまたは non-nil になった場合に、その全てが適用されます。ここで、変数 wl-draft-config-matchone を t にしてあれば、最初にマッチした1つだけを適用することもできます。

要素の2番目には cons か関数の list を指定します。cons にはヘッダの Field か変数、サブ関数を指定します。Field を指定した場合はその Field を変更し、変数を指定した場合は一時的にその変数値を変更します。

値には文字列や変数の他、elisp式をそのまま記述することもできます。もし、 Field の値が nil ならばその Field を削除します。

つづいて、次の例を見て下さい。

(setq wl-draft-config-alist
      '((reply                         ;; (1)
         "X-ML-Name: \\(Wanderlust\\|emacs-mime-ja\\|apel-ja\\)"
         ;; 返信元バッファのヘッダにマッチすれば適用する
         (body . "  こんにちは\n")
         (template . "default")
         )))

この例 (1)のように、ヘッダの正規表現の前に reply をつけると wl-summary-reply などでドラフトを作成した場合、返信元のヘッダにマッチすれば適用されるようになります。ただし、wl-draft を実行したときなど返信元のバッファがない場合は無視されます。

親フォルダの名前を利用したい場合には、バッファローカル変数 wl-draft-parent-folder を利用できます。次の例では、ドラフトを開く時に居たサマリバッファのフォルダ名によって From を変更します。

(setq wl-draft-config-alist
      '(((string-match \".*@domain1$\" wl-draft-parent-folder)
         (\"From\" . \"user@domain1\"))
        ((string-match \".*@domain2$\" wl-draft-parent-folder)
         (\"From\" . \"user@domain2\"))))

何も特別な設定をしなければ、wl-draft-config-alist は、 wl-draft-send-and-exit か wl-draft-send が実行される直前に一度だけ適用されます。送信を取りやめた後に再度 wl-draft-config-alist を適用したい場合は、C-c C-e (wl-draft-config-exec) を実行してください。

wl-draft-send-and-exit、wl-draft-send の実行時に自動的に wl-draft-config-alist を適用したくない場合は、次のように設定して下さい。

(remove-hook 'wl-draft-send-hook 'wl-draft-config-exec)

ドラフトバッファの作成時に自動的に wl-draft-config-alist を適用したい場合は、次のように設定します。

(add-hook 'wl-mail-setup-hook 'wl-draft-config-exec)

サマリモードから ’E’(wl-summary-reedit)を押してメールを編集する時にも自動的に wl-draft-config-alist を適用したい場合は、次のように設定します。

(add-hook 'wl-draft-reedit-hook 'wl-draft-config-exec)

[ < ]

[ > ]

[ << ]

[上]

[ >> ]

[ ? ]

7.1.4 テンプレートの挿入

変数 wl-template-alist を設定し、ドラフトバッファでC-c C-j もしくは M-x wl-template-selectと入力することで適用します。 wl-template-alist の書式は wl-draft-config-alist とほぼ同じです。 See section メッセージの動的な変更.

(setq wl-template-alist
      '(("default"
         ("From" . wl-from)
         ("Organization" . "組織名")
         (body . "  ○○です。\n"))
        ("report"
         (template . "default")                 ;; (a)
         ("To" . "jousi@example.com")
         ("Subject" . "報告")
         (body-file . "~/work/report.txt")
         )
        ))

このようにヘッダの正規表現の代わりに ‘default’ や ‘report’ のように各要素の名前(テンプレート名)をつけるだけです。各要素の定義は wl-draft-config-alist と同じなので、(a)のように別のテンプレートを呼ぶことも可能です。

コマンド wl-template-select を実行すると、テンプレートを選択できます。変数 wl-template-visible-select の値によって、それぞれ以下のように振舞います。

wl-template-visible-select が t (デフォルト)の場合、ドラフトバッファの下に適用後のバッファウィンドウが表示されるので、それを見ながら n と p で選択します。そしてリターンキーで決定すると実際にドラフトバッファに適用されます。q を押すと何も適用されません。なお、 wl-template-buffer-lines でウィンドウの大きさを変更できます。

wl-template-visible-select が nil の場合、ミニバッファでテンプレート名を入力することで選択します。

wl-template-select を prefix argument つきで実行した場合には、 wl-template-visible-select の値を逆にした動作になります。

また、wl-draft-config-alist の例のように例えば

(template . "default")

と書くことで ‘default’ のテンプレートを適用できます。

[ < ]

[ > ]

[ << ]

[上]

[ >> ]

[ ? ]

7.1.5 POP-before-SMTP によるメールの送信

POP-before-SMTP によるメールの送信ができます。設定は、

(setq wl-draft-send-mail-function 'wl-draft-send-mail-with-pop-before-smtp)

の1行のみですが、必要に応じて以下の変数を設定してください。

wl-pop-before-smtp-user: POP-before-SMTP で認証を行なうときの POP ユーザ名です。設定していない場合は elmo-pop3-default-user を使います。
wl-pop-before-smtp-server: POP-before-SMTP で認証を行なうときの POP サーバ名です。設定していない場合は elmo-pop3-default-server を使います。
wl-pop-before-smtp-authenticate-type: POP-before-SMTP で認証を行なうときの POP 認証方式です。設定していない場合は elmo-pop3-default-authenticate-type を使います。
wl-pop-before-smtp-port: POP-before-SMTP で認証を行なうときの POP ポート番号です。設定していない場合は elmo-pop3-default-port を使います。
wl-pop-before-smtp-stream-type: ssl なら SSL を利用して POP コネクションを張ります。starttls なら STARTTLS (RFC2595) を利用してコネクションを張ります。設定していない場合は elmo-pop3-default-stream-type を使います。

POP-before-SMTP 用の変数 (wl-pop-before-smtp-*)を設定していない場合には、POP フォルダの設定 (elmo-pop3-default-*) が用いられます。そのため、SMTP サーバと POP サーバの実体が同じで、デフォルト設定の POP フォルダ(‘&’ など)が利用可能なら、設定は不要です。

なお、POP-before-SMTP については以下を参照してください。

http://spam.ayamura.org/tools/smPbS.html
http://www.iecc.com/pop-before-smtp.html

[ < ]

[ > ]

[ << ]

[上]

[ >> ]

[ ? ]

7.2 キーバインド

C-c C-y: 現在表示中のメッセージバッファ(カーソル位置のパート)の内容を引用します。リージョンが有効な場合には、リージョンを引用します (transient-mark-mode (GNU Emacs の場合) か zmacs-regions (XEmacs の場合) が Non-nil の時のみ)。また、prefix argument を付けると、yank で挿入されるテキストの内容(クリップボードの内容)が引用されます。 (wl-draft-yank-original)
C-c C-p: 現在のドラフトの内容をプレビューします。 MIME のマルチパートメッセージの確認に使うと便利です。 (wl-draft-preview-message)
C-c C-s: 現在のドラフトの内容を送信します。ドラフトバッファは消去しません。複数の人に少しずつ内容を変えてメッセージを送りたい場合に便利です。 (wl-draft-send)
C-c C-c: 現在のドラフトの内容を送信し、ドラフトバッファを消去します。 (wl-draft-send-and-exit)
C-x C-s: 現在のドラフトをセーブします。 (wl-draft-save)
C-c C-k: 現在のドラフトを破棄します。セーブしていた場合、‘+draft’ フォルダからも削除されます。 (wl-draft-kill)
C-x k: 現在のドラフトを破棄します。 (wl-draft-mimic-kill-buffer)
C-c C-z: 現在のドラフトをセーブし、ドラフトバッファを消去します。ドラフトの編集を中断したいときに便利です。 ‘+draft’ フォルダに入って E (wl-summary-reedit を押せば、編集を再開できます。 (wl-draft-save-and-exit)
C-c C-r: 指定されたリージョンをシーザ暗号でエンコード/デコードします。 (wl-caesar-region)
C-l: 現在のドラフトをハイライトしなおします。 (wl-draft-highlight-and-recenter)
M-t: Wanderlust のオフラインモード/オンラインモードをトグルします。 (wl-toggle-plugged)
C-c C-o: 他のドラフトバッファがあれば移動します。また、prefix argument をつけることにより、バッファが存在していない場合は、ドラフトフォルダからファイルを(存在すれば)読み込みます。 (wl-jump-to-draft-buffer)
C-c C-e: wl-draft-config-alistを適用します。 (wl-draft-config-exec)
C-c C-j: テンプレートを選択します。 (wl-template-select)
C-c C-a: アドレスマネージャを起動します。 See section アドレスマネージャ. (wl-addrmgr)
C-c C-d: ポイントとマークの間の文を省きます (wl-draft-elide-region)。文章は切られて (killed) 変数 wl-draft-elide-ellipsis の値で置き換えられます。デフォルトの省略符号として使われる値は (‘[...]’) です。

[ < ]

[ > ]

[ << ]

[上]

[ >> ]