(defun prepare-report () (interactive) (notmuch-mua-new-mail) (insert "foo@example.com") (search-forward "Subject: ") (insert "work report week " (format-time-string "%W")) (search-forward "\n\n") (backward-char) (insert "my super email content\n"))
Aucun commentaire:
Enregistrer un commentaire