Files
emacs/lisp/0patches/ox-rst_ox-rst.el_table-header-line.patch

21 lines
892 B
Diff

diff --git a/lisp/ox-rst/ox-rst.el b/lisp/ox-rst/ox-rst.el
index 0b19576d..ce958352 100644
--- a/lisp/ox-rst/ox-rst.el
+++ b/lisp/ox-rst/ox-rst.el
@@ -1513,8 +1513,13 @@ a communication channel."
(cond
((not (= 1 rowgroup-number))
?-)
- ((org-export-table-has-header-p
- (org-element-lineage table-row 'table) info)
+ ;; ((org-export-table-has-header-p
+ ;; (org-element-lineage table-row 'table) info)
+ ;; ?=)
+ ;; double line only at the end of the header
+ ((and (org-export-table-has-header-p
+ (org-element-lineage table-row 'table) info)
+ (org-export-table-row-ends-header-p table-row info))
?=)
(t ?-)))
(makeline