From 594b7808a144289354af67026bb7911bdd2f02fd Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Sat, 4 Jan 2014 23:28:49 +0100 Subject: [PATCH] org-element: Fix parsing orphaned affiliated keywords * lisp/org-element.el (org-element-keyword-parser): Fix parsing orphaned affiliated keywords. --- lisp/org-element.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/org-element.el b/lisp/org-element.el index a02aa5b08..6c2d5e11f 100644 --- a/lisp/org-element.el +++ b/lisp/org-element.el @@ -2029,7 +2029,10 @@ Return a list whose CAR is `keyword' and CDR is a plist containing `:key', `:value', `:begin', `:end', `:post-blank' and `:post-affiliated' keywords." (save-excursion - (let ((begin (car affiliated)) + ;; An orphaned affiliated keyword is considered as a regular + ;; keyword. In this case AFFILIATED is nil, so we take care of + ;; this corner case. + (let ((begin (or (car affiliated) (point))) (post-affiliated (point)) (key (progn (looking-at "[ \t]*#\\+\\(\\S-+*\\):") (upcase (org-match-string-no-properties 1)))) -- 2.11.4.GIT