Merge branch 'master' of git+ssh://repo.or.cz/srv/git/org-mode

This commit is contained in:
Carsten Dominik 2010-04-13 03:46:00 +02:00
commit 889a8d8ede
1 changed files with 4 additions and 1 deletions

View File

@ -188,9 +188,12 @@ TMP-FILE during export."
(insert org-mime-default-header)
(insert body)
(write-file tmp-file)
(org-load-modules-maybe)
(unless org-local-vars
(setq org-local-vars (org-get-local-variables)))
(substring
(eval ;; convert to fmt -- mimicing `org-run-like-in-org-mode'
(list 'let org-local-vars
(list 'let org-local-vars
(list (intern (concat "org-export-as-" fmt))
nil nil nil ''string t)))
(if (string= fmt "org") (length org-mime-default-header) 0)))))