mirrors/doomemacs
1
Fork 0
mirror of https://github.com/doomemacs/doomemacs.git synced 2025-12-06 02:30:33 -08:00
Code Issues Projects Releases Wiki Activity

feat(literate): add indent babel block helper

Browse source 
This adds a helper function, which can be used to auto indent all
emacs-lisp babel src blocks in the current file. It's intended to help
users to auto format their emacs-lisp blocks in their literate config,
improving the styling of each respective codeblock.
This commit is contained in:
Peter Farr 2025-08-15 20:16:52 -04:00
parent 4b3ef167aa
commit a2bcbd428f
1 changed files with 12 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

12
modules/config/literate/autoload.el
View file

@ -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