mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-09-16 01:40:01 +00:00
org-indent-line: Do not rely upon TAB being bound to indentation
* lisp/org.el (org-indent-line): When indenting natively in src blocks, call `indent-line-function' instead of relying upon "TAB" binding doing indentation.
This commit is contained in:
parent
d8ac958836
commit
55795376b6
|
@ -19660,7 +19660,7 @@ Also align node properties according to `org-property-format'."
|
||||||
(org-with-point-at (org-element-property :begin element)
|
(org-with-point-at (org-element-property :begin element)
|
||||||
(+ (org-current-text-indentation)
|
(+ (org-current-text-indentation)
|
||||||
org-edit-src-content-indentation)))))
|
org-edit-src-content-indentation)))))
|
||||||
(org-babel-do-key-sequence-in-edit-buffer (kbd "TAB"))
|
(org-babel-do-in-edit-buffer (funcall indent-line-function))
|
||||||
(when (and block-content-ind (looking-at-p "^$"))
|
(when (and block-content-ind (looking-at-p "^$"))
|
||||||
(indent-line-to block-content-ind))))
|
(indent-line-to block-content-ind))))
|
||||||
(t
|
(t
|
||||||
|
|
Loading…
Reference in a new issue