From: Jos'h Fuller <Jos'h.Fuller@arcproductions.com>
To: emacs-orgmode@gnu.org, Jos'h.Fuller@arcproductions.com
Subject: Sending and archiving emails with capture...
Date: Thu, 15 Mar 2012 17:22:02 -0400 [thread overview]
Message-ID: <yy9fwd9d0g5.fsf@arcproductions.com> (raw)
Hi!
Assuming I've got everything set up correctly and this email makes it
to the list, this is in response to Alan E. Davis' question about
sending an email from Emacs and saving a copy in org-mode.
I make the assumption here that your Emacs is set up to properly send
emails using the ~mail~ command. Also note that my
~org-capture-templates~ setup has more than just an email template.
Install the lines below just after your org-mode install.
To use:
- Invoke org-capture from any buffer with C-cc.
- Choose the Mail template ([m] key).
- Enter the recipient's address, then [enter].
- Enter the mail subject, then [enter].
- Your cursor is positioned at the start of the email.
- Write your email.
- C-c C-c sends it on its way!
This is very crude and could certainly be improved. However, perhaps
it's a reasonable starting point!
Jos'h
-- snip! --------------------------------------------------------------------
;; Capture Setup
(setq org-capture-templates
(quote
(("m" "Mail" entry (file+olp org-default-notes-file "Emails") "** Email %T
From: Your Name <yourname@yourcompany.com>
To: %^{Send mail to}
Subject: %^{Subject}
--text follows this line--
%?
_______________________________________________________________________________
This is a signature...")
("t" "todo" entry (file org-default-notes-file)
"* TODO %?\n%U\n%a\n %i" :clock-in t :clock-resume t)
("n" "note" entry (file org-default-notes-file)
"* %? :NOTE:\n%U\n%a\n %i" :clock-in t :clock-resume t)
("h" "Habit" entry (file org-default-notes-file)
"* NEXT %?\n%U\n%a\nSCHEDULED: %t .+1d/3d\n:PROPERTIES:\n:STYLE: habit\n:REPEAT_TO_STATE: NEXT\n:END:\n %i"))))
(defun my-finalize-capture ()
"This is run from the org-capture-before-finalize hook just
before the indirect buffer is closed.
If the current local capture is a 'Mail' message, I extract it
and send it on it's way. Because I am cautious, I extract the
text from the org buffer and put it into a private temporary
buffer before sending it as an email.
This may not be the best way to do this..."
(message "* Running custom finalize hook...")
(if (string= "Mail" (org-capture-get :description))
(save-excursion
(goto-char (org-capture-get :begin-marker t))
(next-line) ; Skip past org slug line.
(let* ((msg (buffer-substring (point) (org-capture-get :end-marker t))))
(with-temp-buffer
(insert msg)
(mail-send)
))
))
)
(add-hook 'org-capture-before-finalize-hook 'my-finalize-capture)
(define-key global-map "\C-cc" 'org-capture)
_______________________________________________________________________________
Jos'h Fuller, Production Programmer
Arc Productions Ltd.
p: 416.682.5237 | f: 416.682.5209 | http://www.arcproductions.com
230 Richmond Street East | Toronto, ON M5A 1P4 |
next reply other threads:[~2012-03-15 21:22 UTC|newest]
Thread overview: 4+ messages / expand[flat|nested] mbox.gz Atom feed top
2012-03-15 21:22 Jos'h Fuller [this message]
2012-03-15 21:44 ` Sending and archiving emails with capture Peter Salazar
2012-03-15 21:52 ` Jos'h Fuller
2012-03-18 5:36 ` Peter Salazar
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.orgmode.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=yy9fwd9d0g5.fsf@arcproductions.com \
--to=jos'h.fuller@arcproductions.com \
--cc=emacs-orgmode@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).