David O'Toole writes: > I am working on my blog extension for org-publish. I would like to > convert a region of text (say, between two markers) from org-mode > markup into html and then paste the resulting html into another buffer > where I am building a full page. I need to do this from a lisp > program. It says that org-export-as-html will export an active region > but I tried it and it doesn't work in a temp-buffer where > (buffer-file-name) is nil. Anyway, would it be hard to expose a > function like the following? > > (defun org-export-region-to-html (beg end) > "Convert region between BEG and END into HTML, placing the result > into a new buffer. The new buffer is returned." > ... > ... I did something similar for Muse recently. I'm including the code snippet in case it comes in handy. ;;;###autoload (defun muse-publish-region (beg end &optional title style) "Apply the given STYLE's markup rules to the given region. The result is placed in a new buffer that includes TITLE in its name." (interactive "r") (when (interactive-p) (unless title (setq title (read-string "Title: "))) (unless style (setq style (muse-publish-get-style)))) (let ((muse-publishing-current-style style) (muse-publishing-p t) (text (buffer-substring beg end)) (buf (generate-new-buffer (concat "*Muse: " title "*")))) (with-current-buffer buf (insert text) (muse-publish-markup-buffer title style) (goto-char (point-min)) (let ((inhibit-read-only t)) (remove-text-properties (point-min) (point-max) '(rear-nonsticky nil read-only nil)))) (pop-to-buffer buf))) -- Michael Olson -- FSF Associate Member #652 | http://mwolson.org/ -- Jabber: mwolson_at_hcoop.net | /` |\ | | | Sysadmin -- Hobbies: Lisp, GP2X, HCoop | |_] | \| |_| Projects: Emacs, Muse, ERC, EMMS, ErBot, DVC, Planner |