summaryrefslogtreecommitdiff
path: root/lisp/org-wl.el
diff options
context:
space:
mode:
authorDavid Maus <dmaus@ictsoc.de>2010-09-23 18:09:23 +0200
committerDavid Maus <dmaus@ictsoc.de>2010-09-23 18:09:23 +0200
commiteab115bf66f4ce4a08fe58f3b91c712773bc54e2 (patch)
treee1882fad833359435d39e4fae7c02ac27d78b1fc /lisp/org-wl.el
parentfa93aa78f80581f3cd486ccac93a1079a071ed6a (diff)
Always get literal content of header fields
* org-wl.el (org-wl-message-field): Always get literal content of header fields.
Diffstat (limited to 'lisp/org-wl.el')
-rw-r--r--lisp/org-wl.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-wl.el b/lisp/org-wl.el
index b6ea5f6cc..3d2537080 100644
--- a/lisp/org-wl.el
+++ b/lisp/org-wl.el
@@ -140,7 +140,7 @@ folder name determines the the folder type."
"Return content of FIELD in ENTITY.
FIELD is a symbol of a rfc822 message header field.
ENTITY is a message entity."
- (let ((content (elmo-message-entity-field entity field)))
+ (let ((content (elmo-message-entity-field entity field 'string)))
(if (listp content) (car content) content)))
(defun org-wl-store-link ()