17 lines
334 B
EmacsLisp
17 lines
334 B
EmacsLisp
|
(defun d2-format-buffer ()
|
||
|
|
"Run prettier."
|
||
|
|
(interactive)
|
||
|
|
(run-command-on-buffer "d2" "fmt" "-")
|
||
|
|
)
|
||
|
|
|
||
|
|
(use-package d2-mode
|
||
|
|
:commands (d2-mode)
|
||
|
|
:hook (
|
||
|
|
(d2-mode . (lambda ()
|
||
|
|
;; (add-hook 'before-save-hook 'd2-format-buffer nil 'local)
|
||
|
|
))
|
||
|
|
)
|
||
|
|
)
|
||
|
|
|
||
|
|
(provide 'lang-d2)
|