mirrors
/
org-mode
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git
0
0
Fork 1
Code Releases Activity

org-lparse.el: Abort export if list-tables are malformed 

* contrib/lisp/org-lparse.el (org-lparse-format-table-row): In
list-tables, require that the header row be a row with max
number of columns. Abort export if this condition is not met.
This commit is contained in:
Jambunathan K 2011-09-02 14:27:31 +05:30
parent c51b7cfd40
commit d85635306b
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
contrib/lisp/org-lparse.el
View File

@ -2049,7 +2049,12 @@ See `org-xhtml-entity-format-callbacks-alist' for more information."
lines)
(defun org-lparse-format-table-row (fields &optional text-for-empty-fields)
(unless org-lparse-table-ncols
(if org-lparse-table-ncols
;; second and subsequent rows of the table
(when (and org-lparse-list-table-p
(> (length fields) org-lparse-table-ncols))
(error "Table row has %d columns but header row claims %d columns"
(length fields) org-lparse-table-ncols))
;; first row of the table
(setq org-lparse-table-ncols (length fields))
(when org-lparse-table-is-styled