diff options
| author | Arun Isaac | 2021-06-10 17:18:36 +0530 |
|---|---|---|
| committer | Arun Isaac | 2021-06-10 19:51:50 +0530 |
| commit | 25c335ebb4ff3b3143b2adec694fe519a93808a2 (patch) | |
| tree | 8e9cc754620a08bd9d1494c463acd77bc1cd511c | |
| parent | 57f391cb1f781b30e8a8f73f7da23fac24070e7e (diff) | |
| download | guile-email-25c335ebb4ff3b3143b2adec694fe519a93808a2.tar.gz guile-email-25c335ebb4ff3b3143b2adec694fe519a93808a2.tar.lz guile-email-25c335ebb4ff3b3143b2adec694fe519a93808a2.zip | |
build-website: Do not override org-html--svg-image.
SVG image export works correctly out of the box in org.
* build-website.el (org-html--svg-image): Delete function.
| -rw-r--r-- | build-website.el | 16 |
1 files changed, 1 insertions, 15 deletions
diff --git a/build-website.el b/build-website.el index e85107f..f10b89b 100644 --- a/build-website.el +++ b/build-website.el @@ -1,5 +1,5 @@ ;;; guile-email --- Guile email parser -;;; Copyright © 2019, 2020 Arun Isaac <arunisaac@systemreboot.net> +;;; Copyright © 2019, 2020, 2021 Arun Isaac <arunisaac@systemreboot.net> ;;; ;;; This file is part of guile-email. ;;; @@ -39,19 +39,5 @@ org-html-head-include-scripts nil org-html-postamble nil) -;; Override org-html--svg-image to export svg using an img tag instead -;; of an object tag. -(defun org-html--svg-image (source attributes info) - "Return \"object\" embedding svg file SOURCE with given ATTRIBUTES. -INFO is a plist used as a communication channel." - (let ((attrs (org-html--make-attribute-string - (org-combine-plists - ;; Remove fallback attribute, which is not meant to - ;; appear directly in the attributes string, and - ;; provide a default class if none is set. - '(:class "org-svg") attributes '(:fallback nil))))) - (org-html-close-tag - "img" (format "src=\"%s\" %s" source attrs) info))) - (with-current-buffer (find-file "README.org") (org-export-to-file 'html "website/index.html")) |