diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2018-01-28 14:06:33 +0100 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2018-01-28 14:06:33 +0100 |
commit | b4dda5f340854fa96173bfaff87660757d0d5bd6 (patch) | |
tree | d097b2b108e3395418176db01888c9050612ebe9 | |
parent | 33a9eef11ffad3f2b2a21d2eac1e34bb72978db8 (diff) | |
download | org-mode-b4dda5f340854fa96173bfaff87660757d0d5bd6.tar.gz |
org-element: Print lower case affiliated keywords
* lisp/org-element.el (org-element--interpret-affiliated-keywords):
Print lower case keywords.
-rw-r--r-- | lisp/org-element.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-element.el b/lisp/org-element.el index 340f8c5..6c78d21 100644 --- a/lisp/org-element.el +++ b/lisp/org-element.el @@ -4581,7 +4581,7 @@ If there is no affiliated keyword, return the empty string." (let (dual) (when (member key org-element-dual-keywords) (setq dual (cdr value) value (car value))) - (concat "#+" key + (concat "#+" (downcase key) (and dual (format "[%s]" (org-element-interpret-data dual))) ": " |