diff --git a/site-lisp/ox-my-html/ox-my-html.el b/site-lisp/ox-my-html/ox-my-html.el index 95e4d64..d87fd41 100644 --- a/site-lisp/ox-my-html/ox-my-html.el +++ b/site-lisp/ox-my-html/ox-my-html.el @@ -52,7 +52,8 @@ (if a (org-my-html-export-to-html t s v b) (org-open-file (org-my-html-export-to-html nil s v b))))))) :options-alist - '((:my-html-embed-svg "HTML_EMBED_SVG" nil nil t)) + '((:with-html-svg-embedding "HTML_EMBED_SVG" ;; groks nil as "nil" in Org file! + "html-embed-svg" org-html-embed-svg)) :translate-alist '((link . org-my-html-link))) @@ -61,9 +62,13 @@ ;;;; Links :: Embed SVG -(defcustom org-my-html-embed-svg t +(defcustom org-html-embed-svg nil "Non-nil means embed SVG images into exported my-HTML pages, -otherwise link to SVG images from exported my-HTML pages." +otherwise link to SVG images from exported my-HTML pages. Use +#+OPTIONS: html-embed-svg:t +or +#+OPTIONS: html-embed-svg:nil +to enable or disable SVG embedding in Org files." :group 'org-export-html :version "30.0" :type 'boolean) @@ -171,7 +176,7 @@ contrary to `org-html-link' which can only link such images." ;; Link type is handled by a special function. ((org-export-custom-protocol-maybe link desc 'html info)) ;; Embed SVG. - ((and (plist-get info :my-html-embed-svg) + ((and (plist-get info :with-html-svg-embedding) (org--my-html-embed-svg-p link)) (org--my-html-svg-contents path)) ;; Image file.