emacs/lisp/+compile.el
Case Duckworth 0730f1e1ac Add +compile-dispatch
At some point I probably should add a +recompile .. or something, I'm not sure
how the compile flow works in Emacs.
2022-05-01 09:21:51 -05:00

20 lines
466 B
EmacsLisp

;;; +compile.el --- Extras for compile -*- lexical-binding: t; -*-
;;; Commentary:
;;; Code:
(defcustom +compile-function nil
"Function to run to \"compile\" a buffer."
:type 'function
:local t)
(defun +compile-dispatch (&optional arg)
"Run `+compile-function', if bound, or `compile'.
Any prefix ARG is passed to that function."
(interactive "P")
(call-interactively (or +compile-function #'compile)))
(provide '+compile)
;;; +compile.el ends here