mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-19 08:49:09 +00:00
ob-exp: Fix small bug
* lisp/ob-exp.el (org-export-blocks-preprocess): Pos can sometimes be set to a value greater than start, because of indentation, and lead to a search bound error.
This commit is contained in:
parent
2608bed9ea
commit
866d28d48e
|
@ -291,7 +291,7 @@ this template."
|
||||||
(indent-line-to ind))
|
(indent-line-to ind))
|
||||||
;; Indent everything.
|
;; Indent everything.
|
||||||
(indent-code-rigidly match-start (point) ind)))))
|
(indent-code-rigidly match-start (point) ind)))))
|
||||||
(setq pos (point))
|
(setq pos (line-beginning-position))
|
||||||
;; Cleanup markers.
|
;; Cleanup markers.
|
||||||
(set-marker match-start nil)
|
(set-marker match-start nil)
|
||||||
(set-marker begin nil)
|
(set-marker begin nil)
|
||||||
|
|
Loading…
Reference in a new issue