diff options
| author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-09-10 17:56:37 +0200 |
|---|---|---|
| committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-09-10 17:56:37 +0200 |
| commit | 8c85c990521cc833df9179894f6f8b2934d2231a (patch) | |
| tree | 39a9b969fcbb8491ee84413d548855d651384672 | |
| parent | f91968bc38cac2ef4658327f35ecfa52fb405793 (diff) | |
| parent | bc322fc57d1f7643015d496502ae74f40580f328 (diff) | |
| download | org-mode-8c85c990521cc833df9179894f6f8b2934d2231a.tar.gz | |
Merge branch 'maint'
| -rw-r--r-- | lisp/org-element.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/org-element.el b/lisp/org-element.el index 06eab04..3c882e5 100644 --- a/lisp/org-element.el +++ b/lisp/org-element.el @@ -3849,8 +3849,9 @@ position of point and CDR is nil." (and dualp (let ((sec (org-match-string-no-properties 2))) (if (or (not sec) (not parsedp)) sec - (org-element--parse-objects - (match-beginning 2) (match-end 2) nil restrict))))) + (save-match-data + (org-element--parse-objects + (match-beginning 2) (match-end 2) nil restrict)))))) ;; Attribute a property name to KWD. (kwd-sym (and kwd (intern (concat ":" (downcase kwd)))))) ;; Now set final shape for VALUE. |