diff --git a/lisp/org.el b/lisp/org.el old mode 100644 new mode 100755 index 35b9fc779..8eed2cc90 --- a/lisp/org.el +++ b/lisp/org.el @@ -18412,7 +18412,7 @@ When a buffer is unmodified, it is just killed. When modified, it is saved (org-defkey org-cdlatex-mode-map "^" 'org-cdlatex-underscore-caret) (org-defkey org-cdlatex-mode-map "`" 'cdlatex-math-symbol) (org-defkey org-cdlatex-mode-map "'" 'org-cdlatex-math-modify) -(org-defkey org-cdlatex-mode-map "\C-c{" 'cdlatex-environment) +(org-defkey org-cdlatex-mode-map "\C-c{" 'org-cdlatex-environment-indent) (defvar org-cdlatex-texmathp-advice-is-done nil "Flag remembering if we have applied the advice to texmathp already.") @@ -18490,6 +18490,13 @@ Revert to the normal definition outside of these fragments." (let (org-cdlatex-mode) (call-interactively (key-binding (vector last-input-event)))))) +(defun org-cdlatex-environment-indent (&optional environment item) + "Execute `cdlatex-environment' and indent the inserted environment." + (interactive) + (cdlatex-environment environment item) + (let ((element (org-element-at-point))) + (org-indent-region (org-element-property :begin element) + (org-element-property :end element)))) ;;;; LaTeX fragments