Browse Source

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).
Bastien Guerry 12 years ago
parent
commit
4b139ec4c8
1 changed files with 2 additions and 0 deletions
  1. 2 0
      lisp/ox-html.el

+ 2 - 0
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
 During evaluation, these variables will be dynamically bound so that
 you can reuse them:
 you can reuse them:
 
 
+       `row-number': row number (0 is the first row)
   `rowgroup-number': group number of current row
   `rowgroup-number': group number of current row
  `start-rowgroup-p': non-nil means the row starts a group
  `start-rowgroup-p': non-nil means the row starts a group
    `end-rowgroup-p': non-nil means the row ends a group
    `end-rowgroup-p': non-nil means the row ends a group
@@ -2966,6 +2967,7 @@ communication channel."
   ;; borders of the current row.
   ;; borders of the current row.
   (when (eq (org-element-property :type table-row) 'standard)
   (when (eq (org-element-property :type table-row) 'standard)
     (let* ((rowgroup-number (org-export-table-row-group table-row info))
     (let* ((rowgroup-number (org-export-table-row-group table-row info))
+	   (row-number (org-export-table-row-number table-row info))
 	   (start-rowgroup-p
 	   (start-rowgroup-p
 	    (org-export-table-row-starts-rowgroup-p table-row info))
 	    (org-export-table-row-starts-rowgroup-p table-row info))
 	   (end-rowgroup-p
 	   (end-rowgroup-p