summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien Guerry <bzg@altern.org>2013-04-09 15:18:32 (GMT)
committer Bastien Guerry <bzg@altern.org>2013-04-09 15:18:32 (GMT)
commit4b139ec4c843bb5d35cb7fd48a11294db9e7c37a (patch)
tree3774c1f40390a43876005387f12ed6a819d2a656
parent1ebac8923c7fb13427688a93e51ac64720a834ea (diff)
downloadorg-mode-4b139ec4c843bb5d35cb7fd48a11294db9e7c37a.zip
org-mode-4b139ec4c843bb5d35cb7fd48a11294db9e7c37a.tar.gz
ox-html.el (org-html-table-row-tags): Allow new dynamically bound value `row-number'
* ox-html.el (org-html-table-row-tags): Allow new dynamically bound value `row-number'. (org-html-table-row): Bind `row-number' to the number of the row (first row is 0).
-rw-r--r--lisp/ox-html.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/ox-html.el b/lisp/ox-html.el
index 46543bc..19743cf 100644
--- a/lisp/ox-html.el
+++ b/lisp/ox-html.el
@@ -786,6 +786,7 @@ evaluated for each row in order to construct the table row tags.
During evaluation, these variables will be dynamically bound so that
you can reuse them:
+ `row-number': row number (0 is the first row)
`rowgroup-number': group number of current row
`start-rowgroup-p': non-nil means the row starts a group
`end-rowgroup-p': non-nil means the row ends a group
@@ -2966,6 +2967,7 @@ communication channel."
;; borders of the current row.
(when (eq (org-element-property :type table-row) 'standard)
(let* ((rowgroup-number (org-export-table-row-group table-row info))
+ (row-number (org-export-table-row-number table-row info))
(start-rowgroup-p
(org-export-table-row-starts-rowgroup-p table-row info))
(end-rowgroup-p