Function: markdown-block-region
markdown-block-region is a byte-compiled function defined in
markdown-mode.el.
Signature
(markdown-block-region BEG END PREFIX)
Documentation
Format the region using a block prefix.
Arguments BEG and END specify the beginning and end of the region. The characters PREFIX will appear at the beginning of each line.
Source Code
;; Defined in ~/.emacs.d/elpa/markdown-mode-20260321.143/markdown-mode.el
(defun markdown-block-region (beg end prefix)
"Format the region using a block prefix.
Arguments BEG and END specify the beginning and end of the
region. The characters PREFIX will appear at the beginning
of each line."
(save-excursion
(let* ((end-marker (make-marker))
(beg-marker (make-marker))
(prefix-without-trailing-whitespace
(replace-regexp-in-string (rx (+ blank) eos) "" prefix)))
;; Ensure blank line after and remove extra whitespace
(goto-char end)
(skip-syntax-backward "-")
(set-marker end-marker (point))
(delete-horizontal-space)
(markdown-ensure-blank-line-after)
;; Ensure blank line before and remove extra whitespace
(goto-char beg)
(skip-syntax-forward "-")
(delete-horizontal-space)
(markdown-ensure-blank-line-before)
(set-marker beg-marker (point))
;; Insert PREFIX before each line
(goto-char beg-marker)
(while (and (< (line-beginning-position) end-marker)
(not (eobp)))
;; Don’t insert trailing whitespace.
(insert (if (eolp) prefix-without-trailing-whitespace prefix))
(forward-line)))))