emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/org-mime 957bb3b43a 014/118: Merge pull request #3 from ac


From: ELPA Syncer
Subject: [nongnu] elpa/org-mime 957bb3b43a 014/118: Merge pull request #3 from acowley/plain-part
Date: Wed, 5 Jan 2022 07:58:42 -0500 (EST)

branch: elpa/org-mime
commit 957bb3b43a1a3aa0c2cd71061a062449762806ad
Merge: d3ae6df753 0caaf273e7
Author: Chen Bin <chenbin.sh@gmail.com>
Commit: GitHub <noreply@github.com>

    Merge pull request #3 from acowley/plain-part
    
    Use a plain ASCII export for the text part
---
 org-mime.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/org-mime.el b/org-mime.el
index 13bed2ceda..82d28f2e82 100644
--- a/org-mime.el
+++ b/org-mime.el
@@ -289,6 +289,7 @@ it is not set."
                           (buffer-string))
                       body))))
       (let* ((org-link-file-path-type 'absolute)
+             (plain (org-export-string-as (org-babel-trim body) 'ascii t opts))
              ;; we probably don't want to export a huge style file
              (org-export-htmlize-output-type 'inline-css)
              (html-and-images
@@ -296,7 +297,7 @@ it is not set."
                (org-mime--export-string (bhook body 'html) opts) file))
              (images (cdr html-and-images))
              (html (org-mime-apply-html-hook (car html-and-images))))
-        (insert (org-mime-multipart (org-babel-trim body) html)
+        (insert (org-mime-multipart plain html)
                 (mapconcat 'identity images "\n"))))))
 
 (defun org-mime-org-buffer-htmlize ()



reply via email to

[Prev in Thread] Current Thread [Next in Thread]