diff --git a/lisp/ChangeLog b/lisp/ChangeLog index bb13620a5..8698b4521 100755 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -3,6 +3,8 @@ * org-exp.el (org-export-as-html): Add a "content" div around the entire content of the body tag. (org-export-html-get-bibliography): New function. + (org-export-html-validation-link): New variable. + (org-export-as-html): Add validation link to exported page. * org.el (org-match-sparse-tree): Renamed from `org-tags-sparse-tree'. diff --git a/lisp/org-exp.el b/lisp/org-exp.el index f3b5054c1..e8c595558 100644 --- a/lisp/org-exp.el +++ b/lisp/org-exp.el @@ -746,6 +746,11 @@ This is customizable so that alignment options can be specified." :group 'org-export-tables :type '(cons (string :tag "Opening tag") (string :tag "Closing tag"))) +(defcustom org-export-html-validation-link nil + "Non-nil means, add validationlink to postamble of HTML exported files." + :group 'org-export-html + :type 'boolean) + (defcustom org-export-html-with-timestamp nil "If non-nil, write `org-export-html-html-helper-timestamp' into the exported HTML text. Otherwise, the buffer will just be saved @@ -4072,6 +4077,8 @@ lang=\"%s\" xml:lang=\"%s\"> (when org-export-creator-info (insert (format "
HTML generated by org-mode %s in emacs %s
\n" org-version emacs-major-version))) + (when org-export-html-validation-link + (insert "")) (insert "")) (if org-export-html-with-timestamp