diff options
| author | David Maus <dmaus@ictsoc.de> | 2010-09-23 18:09:23 +0200 |
|---|---|---|
| committer | David Maus <dmaus@ictsoc.de> | 2010-09-23 18:09:23 +0200 |
| commit | eab115bf66f4ce4a08fe58f3b91c712773bc54e2 (patch) | |
| tree | e1882fad833359435d39e4fae7c02ac27d78b1fc | |
| parent | fa93aa78f80581f3cd486ccac93a1079a071ed6a (diff) | |
| download | org-mode-eab115bf66f4ce4a08fe58f3b91c712773bc54e2.tar.gz | |
Always get literal content of header fields
* org-wl.el (org-wl-message-field): Always get literal content of
header fields.
| -rw-r--r-- | lisp/org-wl.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-wl.el b/lisp/org-wl.el index b6ea5f6..3d25370 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 () |