From 6291ef8b7ff552cc0c65e5ac5ca303f35ba75714 Mon Sep 17 00:00:00 2001 From: Carsten Dominik Date: Thu, 13 Nov 2008 09:15:01 +0100 Subject: [PATCH] Make sure that each tag has an `alt' attribute. XHTML validation requires hat each tag does provide an `alt' attribute. This patch, based on a draft by Sebastian Rose, does fix this. --- lisp/ChangeLog | 5 +++++ lisp/org-exp.el | 11 +++++++++-- 2 files changed, 14 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1644cc532..ff298ed66 100755 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2008-11-13 Carsten Dominik + + * org-exp.el (org-export-as-html): Make sure that each tag + has an `alt' attribute, to ensure XHTML validation. + 2008-11-12 Carsten Dominik * org-publish.el (org-publish-attachment): Allow publishing to diff --git a/lisp/org-exp.el b/lisp/org-exp.el index 3365087f7..d9ed2560f 100644 --- a/lisp/org-exp.el +++ b/lisp/org-exp.el @@ -3250,7 +3250,10 @@ lang=\"%s\" xml:lang=\"%s\"> (if (and (or (eq t org-export-html-inline-images) (and org-export-html-inline-images (not descp))) (org-file-image-p path)) - (setq rpl (concat "")) + (setq rpl (concat "\""")) (setq link (concat type ":" path)) (setq rpl (concat " (or (eq t org-export-html-inline-images) (and org-export-html-inline-images (not descp)))) - (concat "") + (concat "\""") (concat "" (org-export-html-format-desc desc) "")))