☰

Emacsメッセージ：送信メッセージを保存

tag-icon • tag-icon emacs email
Emacsメッセージ：送信メッセージを保存

送信メールを保存するためのEmacsメッセージ（）を取得するにはC-x m？

これを行う標準的な方法はありますか？

できますが、C-x C-s非効率的で忘れやすく、実際に電子メールを100％送信することはできません。後で忘れた最後の瞬間に変更を適用した可能性があります。

この（save-buffer）を「メッセージの送信」フックから呼び出して自動化できますか？ (例text-mode-hook:.) では、どのフックがありますか? （パターンの輪を得る方法は？）

BCC自分に教えてください：エレガントではありませんか？

FCC：最善の解決策のようですが、まだ自動化されているので、良いファイル名を呼び出して生成する必要があります。

答え1

仕事を始めました。プーチン.emacs:

(defun save-sent-mail ()
  (write-file (format-time-string "~/Mail/sent/%Y-%m-%d_%T") nil) )
(add-hook 'message-send-hook 'save-sent-mail)

答え2

アーカイブするグループにgcc-selfこの変数を設定できます。T

その文書を見る ここ。 （または(gnus) Group Parameters）

編集： gcc-self「クラシック」変数ではないので gnus-parameter。

(setq gnus-parameters
      '((".*"
         (gcc-self . t))))

答え3

私はより複雑なソリューションを使用します。

(defconst my-safe-filename-char-regex "[[:alnum:]-_!.@]"
  「安全なファイル名。」）

（my-clean-filename（ファイル名）を定義しました。
  (マップリンク
   (lambda(ch) (または (when (string-match my-safe-filename-char-regex (char-to-string ch)) (char-to-string ch)) "-"))
   ファイル名"") ）

（マイメッセージの保存を拒否しました（）
  その後、メッセージは「gnus-article-save-directory」に保存されます。
正常に送信しました。メールが拒否され、紛失した可能性があります。
もちろん、この機能は保存に役立ちます。 」
  ((eq メインモード「メッセージモード」でない場合)
    （「非メッセージモードバッファへの私のメッセージの保存を呼び出そうとしています」エラー）
  (make-directory gnus-article-save-directory t)
  (let((buf(現在バッファ)))
         (field-to (my-clean-filename (または (message-fetch-field "Newsgroup") (message-fetch-field "To")))))
         （フィールドタイトル（マイクリーンファイル名（メッセージインポートフィールド「タイトル」）））
         文書）
    （setqファイル（concat gnus-article-save-directory "/"
    （一時ファイルを含むファイル
      (バッファバッファ挿入)
      ))))
（マイメッセージ保存に「メッセージ転送フック」を追加）

また、私が使用していることに注意してください。メッセージ送信フック変えるメッセージ送信フック。

関連情報