diff options
author | Julien Danjou <julien@danjou.info> | 2010-12-14 19:32:18 +0000 |
---|---|---|
committer | Carsten Dominik <carsten.dominik@gmail.com> | 2010-12-16 14:17:54 +0100 |
commit | 073391f5a794d3d085774c3c4130966246f0b9c4 (patch) | |
tree | fdf40b2624a6453a70460e251802c06a22196006 | |
parent | 32be74e098ebcbc0c31b347d45c18cd00a9e97bd (diff) | |
download | org-mode-073391f5a794d3d085774c3c4130966246f0b9c4.tar.gz |
Allow to retrieve email link date
* org.el (org-email-link-description): Allow to retrieve email link date.
Signed-off-by: Julien Danjou <julien@danjou.info>
-rw-r--r-- | lisp/org.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/org.el b/lisp/org.el index ee47118..53039e4 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -1321,6 +1321,7 @@ The following %-escapes will be replaced by corresponding information: %c correspondent. Usually \"from NAME\", but if you sent it yourself, it will be \"to NAME\". See also the variable `org-from-is-user-regexp'. %s subject +%d date %m message-id. You may use normal field width specification between the % and the letter. @@ -8497,6 +8498,7 @@ according to FMT (default from `org-email-link-description-format')." (cons "%T" (plist-get p :to)) (cons "%t" (or (plist-get p :toname) (plist-get p :toaddress) "?")) (cons "%s" (plist-get p :subject)) + (cons "%d" (plist-get p :date)) (cons "%m" (plist-get p :message-id))))) (when (string-match "%c" fmt) ;; Check if the user wrote this message |