diff options
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/+compile.el | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/lisp/+compile.el b/lisp/+compile.el new file mode 100644 index 0000000..b20ae4d --- /dev/null +++ b/lisp/+compile.el | |||
@@ -0,0 +1,19 @@ | |||
1 | ;;; +compile.el --- Extras for compile -*- lexical-binding: t; -*- | ||
2 | |||
3 | ;;; Commentary: | ||
4 | |||
5 | ;;; Code: | ||
6 | |||
7 | (defcustom +compile-function nil | ||
8 | "Function to run to \"compile\" a buffer." | ||
9 | :type 'function | ||
10 | :local t) | ||
11 | |||
12 | (defun +compile-dispatch (&optional arg) | ||
13 | "Run `+compile-function', if bound, or `compile'. | ||
14 | Any prefix ARG is passed to that function." | ||
15 | (interactive "P") | ||
16 | (call-interactively (or +compile-function #'compile))) | ||
17 | |||
18 | (provide '+compile) | ||
19 | ;;; +compile.el ends here | ||