New variable `org-export-table-remove-empty-lines'.

* org-exp.el (org-export-table-remove-empty-lines): New custom
variable.
(org-export-remove-special-table-lines): Use it.

This was requested by Eric S Fraga.
This commit is contained in:
Bastien Guerry 2011-03-05 23:35:09 +01:00
parent cc44c2b30a
commit cde08b138e
1 changed files with 9 additions and 2 deletions

View File

@ -560,6 +560,13 @@ the values of constants may be useful to have."
:group 'org-export-tables :group 'org-export-tables
:type 'boolean) :type 'boolean)
(defcustom org-export-table-remove-empty-lines t
"Remove empty lines when exporting tables.
This is the global equivalent of the :remove-nil-lines option
when locally sending a table with #+ORGTBL."
:group 'org-export-tables
:type 'boolean)
(defcustom org-export-prefer-native-exporter-for-tables nil (defcustom org-export-prefer-native-exporter-for-tables nil
"Non-nil means always export tables created with table.el natively. "Non-nil means always export tables created with table.el natively.
Natively means use the HTML code generator in table.el. Natively means use the HTML code generator in table.el.
@ -1920,7 +1927,7 @@ Also, store forcedalignment information found in such lines."
nil nil
(mapcar (mapcar
(lambda (f) (lambda (f)
(or (= (length f) 0) (or (and org-export-table-remove-empty-lines (= (length f) 0))
(string-match (string-match
"\\`<\\([0-9]\\|[lrc]\\|[lrc][0-9]+\\)>\\'" f))) "\\`<\\([0-9]\\|[lrc]\\|[lrc][0-9]+\\)>\\'" f)))
(org-split-string ;; FIXME, can't we do without splitting??? (org-split-string ;; FIXME, can't we do without splitting???