diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-05-01 09:23:35 +0200 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-05-01 09:23:35 +0200 |
commit | 2777b3fd4c7d33291ba68baae9c24e0ad1fc8aa2 (patch) | |
tree | 60ca88a14a0e4492edd6b4a62530ad8e472b6b10 | |
parent | 14f5b132184ac9c0492d8cc94345413b85ef3f55 (diff) | |
download | org-mode-2777b3fd4c7d33291ba68baae9c24e0ad1fc8aa2.tar.gz |
org-element: Tolerate missing space after colon in keywords
* lisp/org-element.el (org-element--set-regexps):
(org-element--affiliated-re): Tolerate missing space after colon in
keywords.
-rw-r--r-- | lisp/org-element.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/org-element.el b/lisp/org-element.el index abefde8..7aab9f6 100644 --- a/lisp/org-element.el +++ b/lisp/org-element.el @@ -164,7 +164,7 @@ specially in `org-element--object-lex'.") ;; double-checked. "#\\(?: \\|$\\|\\+\\(?:" "BEGIN_\\S-+" "\\|" - "\\S-+\\(?:\\[.*\\]\\)?:\\(?: \\|$\\)\\)\\)" + "\\S-+\\(?:\\[.*\\]\\)?:[ \t]*\\)\\)" "\\|" ;; Drawers (any type) and fixed-width areas. Drawers ;; need to be double-checked. @@ -324,7 +324,7 @@ This list is checked after translations have been applied. See `org-element-keyword-translation-alist'.") (defconst org-element--affiliated-re - (format "[ \t]*#\\+\\(?:%s\\):\\(?: \\|$\\)" + (format "[ \t]*#\\+\\(?:%s\\):[ \t]*" (concat ;; Dual affiliated keywords. (format "\\(?1:%s\\)\\(?:\\[\\(.*\\)\\]\\)?" @@ -334,8 +334,7 @@ This list is checked after translations have been applied. See (format "\\(?1:%s\\)" (regexp-opt (org-remove-if - #'(lambda (keyword) - (member keyword org-element-dual-keywords)) + (lambda (k) (member k org-element-dual-keywords)) org-element-affiliated-keywords))) "\\|" ;; Export attributes. |