blob: 9ed731c94fce441da86999ea6e472d53301f597d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
;;; +apheleia.el -*- lexical-binding: t; -*-
;;; Code:
(require 'cl-lib)
;; https://github.com/raxod502/apheleia/pull/63#issue-1077529623
(cl-defun +apheleia-indent-region (&key buffer scratch formatter callback &allow-other-keys)
(with-current-buffer scratch
(setq-local indent-line-function
(buffer-local-value 'indent-line-function buffer))
(indent-region (point-min)
(point-max))
(funcall callback)))
(provide '+apheleia)
;;; +apheleia.el ends here
|
