diff options
| author | Bastien Guerry <bzg@altern.org> | 2013-02-14 10:07:18 (GMT) |
|---|---|---|
| committer | Bastien Guerry <bzg@altern.org> | 2013-02-14 10:07:18 (GMT) |
| commit | 131d70ab48a343d57c4bd56e7467751e72896089 (patch) | |
| tree | c8571b30f8c9238e8de43ee64d378125f11686eb | |
| parent | 6aa8829a1a7d5c96cdd6eebc6a78a639a523adc7 (diff) | |
| download | org-mode-131d70ab48a343d57c4bd56e7467751e72896089.zip org-mode-131d70ab48a343d57c4bd56e7467751e72896089.tar.gz | |
ox-html.el (org-html-table): Append #+attr_html attributes
* ox-html.el (org-html-table): Append #+attr_html attributes.
Thanks to Дядов Васил Стоянов for reporting this and for a preliminary
patch.
| -rw-r--r-- | lisp/ox-html.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/ox-html.el b/lisp/ox-html.el index aa79978..f5312e7 100644 --- a/lisp/ox-html.el +++ b/lisp/ox-html.el @@ -2693,7 +2693,9 @@ contextual information." (and (string-match "<table\\(.*\\)>" table-tag) (match-string 1 table-tag)) (and label (format " id=\"%s\"" - (org-export-solidify-link-text label))))))) + (org-export-solidify-link-text label))) + (unless (string= attributes "") + (concat " " attributes)))))) ;; Remove last blank line. (setq contents (substring contents 0 -1)) (format "<table%s>\n%s\n%s\n%s\n</table>" |
