diff options
author | Bastien Guerry <bzg@altern.org> | 2013-04-09 17:18:32 +0200 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2013-04-09 17:18:32 +0200 |
commit | 4b139ec4c843bb5d35cb7fd48a11294db9e7c37a (patch) | |
tree | 3774c1f40390a43876005387f12ed6a819d2a656 | |
parent | 1ebac8923c7fb13427688a93e51ac64720a834ea (diff) | |
download | 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.el | 2 |
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 |