forked from mirrors/org-mode
ob-exp: Tiny cleanup related to 87ab99
* lisp/ob-exp.el (org-babel-exp-process-buffer): Tiny cleanup related
to 87ab99f563
.
This commit is contained in:
parent
752a4eb49d
commit
8b431a8021
|
@ -267,10 +267,7 @@ this template."
|
|||
(cons
|
||||
(org-element-property :language element)
|
||||
(let ((params (org-element-property :parameters element)))
|
||||
(and params (org-split-string params "[ \t]+")))))
|
||||
(preserve-indent
|
||||
(or org-src-preserve-indentation
|
||||
(org-element-property :preserve-indent element))))
|
||||
(and params (org-split-string params "[ \t]+"))))))
|
||||
;; Execute all non-block elements between POS and
|
||||
;; current block.
|
||||
(org-babel-exp-non-block-elements pos begin)
|
||||
|
@ -291,7 +288,7 @@ this template."
|
|||
(goto-char match-start)
|
||||
(delete-region (point) block-end)
|
||||
(insert replacement)
|
||||
(if preserve-indent
|
||||
(if (org-element-property :preserve-indent element)
|
||||
;; Indent only the code block markers.
|
||||
(save-excursion (skip-chars-backward " \r\t\n")
|
||||
(indent-line-to ind)
|
||||
|
|
Loading…
Reference in a new issue