[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org f58c800 6/8: Merge branch 'maint'
From: |
Stefan Monnier |
Subject: |
[elpa] externals/org f58c800 6/8: Merge branch 'maint' |
Date: |
Tue, 22 Dec 2020 16:13:12 -0500 (EST) |
branch: externals/org
commit f58c8003c3c2d432f5619ea94bb50e5b91b72e3a
Merge: 0517b73 118da7d
Author: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Commit: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Merge branch 'maint'
---
lisp/org-element.el | 19 +++++++++++++++----
1 file changed, 15 insertions(+), 4 deletions(-)
diff --git a/lisp/org-element.el b/lisp/org-element.el
index a2582b8..49a5952 100644
--- a/lisp/org-element.el
+++ b/lisp/org-element.el
@@ -3950,13 +3950,24 @@ element it has to parse."
((or (looking-at "[ \t]*|")
;; There is no strict definition of a table.el
;; table. Try to prevent false positive while being
- ;; quick.
- (let ((rule-regexp "[ \t]*\\+\\(-+\\+\\)+[ \t]*$")
+ ;; quick. Hence, we consider a table.el table is at
+ ;; least one rule, any number of data lines
+ ;; (starting with a vertical bar), and another rule.
+ (let ((rule-regexp
+ (rx (zero-or-more (any " \t"))
+ "+"
+ (one-or-more (one-or-more "-") "+")
+ (zero-or-more (any " \t"))
+ eol))
+ (non-table.el-data-line
+ (rx bol
+ (zero-or-more (any " \t"))
+ (or eol (not (any "| \t")))))
(next (line-beginning-position 2)))
(and (looking-at rule-regexp)
(save-excursion
- (forward-line)
- (re-search-forward "^[ \t]*\\($\\|[^|]\\)" limit t)
+ (end-of-line)
+ (re-search-forward non-table.el-data-line limit t)
(and (> (line-beginning-position) next)
(org-match-line rule-regexp))))))
(org-element-table-parser limit affiliated))
- [elpa] externals/org updated (6b83c6e -> 9140a71), Stefan Monnier, 2020/12/22
- [elpa] externals/org 713b3bf 2/8: org-contacts.el: Inherit face from org-link, Stefan Monnier, 2020/12/22
- [elpa] externals/org 9140a71 8/8: etc/ORG-NEWS: Add example for new startup option, Stefan Monnier, 2020/12/22
- [elpa] externals/org 1f4ea53 3/8: Document changes of headline fontification introduced in 979e82fc3, Stefan Monnier, 2020/12/22
- [elpa] externals/org bb54a95 4/8: Merge branch 'maint', Stefan Monnier, 2020/12/22
- [elpa] externals/org b6e5ca2 1/8: lint: Remove unnecessary call to `tabulated-list-print', Stefan Monnier, 2020/12/22
- [elpa] externals/org f58c800 6/8: Merge branch 'maint',
Stefan Monnier <=
- [elpa] externals/org d7270a2 7/8: Merge branch 'maint', Stefan Monnier, 2020/12/22
- [elpa] externals/org 0517b73 5/8: Merge branch 'maint', Stefan Monnier, 2020/12/22