diff --git a/modules/config/literate/autoload.el b/modules/config/literate/autoload.el index f88de92c3..fe7438e23 100644 --- a/modules/config/literate/autoload.el +++ b/modules/config/literate/autoload.el @@ -166,6 +166,18 @@ (indent-region (point-min) (point-max)) (save-buffer))))) +;;;###autoload +(defun +literate-indent-elisp-src-blocks () + "Indent all emacs-lisp src blocks in the current Org buffer, then save." + (interactive) + (save-excursion + (org-babel-map-src-blocks nil + (when (string= lang "emacs-lisp") + (org-babel-do-in-edit-buffer + (emacs-lisp-mode) + (indent-region (point-min) (point-max))))) + (save-buffer))) + ;; ;;; Hooks