Function: markdown-live-preview-export
markdown-live-preview-export is an interactive and byte-compiled
function defined in markdown-mode.el.
Signature
(markdown-live-preview-export)
Documentation
Export to XHTML using markdown-export.
Browse the resulting file within Emacs using
markdown-live-preview-window-function Return the buffer
displaying the rendered output.
Key Bindings
Source Code
;; Defined in ~/.emacs.d/elpa/markdown-mode-20260321.143/markdown-mode.el
(defun markdown-live-preview-export ()
"Export to XHTML using `markdown-export'.
Browse the resulting file within Emacs using
`markdown-live-preview-window-function' Return the buffer
displaying the rendered output."
(interactive)
(let ((filename (markdown-live-preview-get-filename)))
(when filename
(let* ((markdown-live-preview-currently-exporting t)
(cur-buf (current-buffer))
(export-file (markdown-export filename))
;; get positions in all windows currently displaying output buffer
(window-data
(markdown-live-preview-window-serialize
markdown-live-preview-buffer)))
(save-window-excursion
(let ((output-buffer
(funcall markdown-live-preview-window-function export-file)))
(with-current-buffer output-buffer
(setq markdown-live-preview-source-buffer cur-buf)
(add-hook 'kill-buffer-hook
#'markdown-live-preview-remove-on-kill t t))
(with-current-buffer cur-buf
(setq markdown-live-preview-buffer output-buffer))))
(with-current-buffer cur-buf
;; reset all windows displaying output buffer to where they were,
;; now with the new output
(mapc #'markdown-live-preview-window-deserialize window-data)
;; delete html editing buffer
(let ((buf (get-file-buffer export-file))) (when buf (kill-buffer buf)))
(when (and export-file (file-exists-p export-file)
(eq markdown-live-preview-delete-export
'delete-on-export))
(delete-file export-file))
markdown-live-preview-buffer)))))