ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

org-mime: call 'org and 'ascii hooks appropriately 

patch by Niels Giesen

* contrib/lisp/org-mime.el (org-mime-compose):
This commit is contained in:
Eric Schulte 2010-12-27 20:57:41 -07:00
parent ad6c199ccc
commit 40264e9b75
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
contrib/lisp/org-mime.el
View File

@ -293,7 +293,8 @@ export that region, otherwise export the entire body."
(html (org-mime-apply-html-hook (car html-and-images))))
(insert (org-mime-multipart
(org-export-string
(org-babel-trim (bhook body 'html))
(org-babel-trim
(bhook body (if (eq fmt 'html) 'org 'ascii)))
(if (eq fmt 'html) 'org 'ascii))
html)
(mapconcat 'identity images "\n"))))))))