diff options
| author | David Morgan <djm_uk@protonmail.com> | 2022-10-11 13:32:34 +0100 |
|---|---|---|
| committer | David Morgan <djm_uk@protonmail.com> | 2022-10-11 13:32:34 +0100 |
| commit | 49d58cd764a36584fcb62ed14d808ee8d9b1726d (patch) | |
| tree | bcddd6978ef9ca5ade5f2a34f641e18b4bb94122 /.emacs.d/lisp/init-emacs-lisp.el | |
| parent | 33f9d82235b09e8714e355ee50614b3f419728e8 (diff) | |
| download | dotfiles-49d58cd764a36584fcb62ed14d808ee8d9b1726d.tar.gz | |
Make recompile function interactive
Diffstat (limited to '.emacs.d/lisp/init-emacs-lisp.el')
| -rw-r--r-- | .emacs.d/lisp/init-emacs-lisp.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/.emacs.d/lisp/init-emacs-lisp.el b/.emacs.d/lisp/init-emacs-lisp.el index b206d90..1de66c0 100644 --- a/.emacs.d/lisp/init-emacs-lisp.el +++ b/.emacs.d/lisp/init-emacs-lisp.el @@ -21,12 +21,14 @@ (eval-defun edebug-it))) ;; Based on prelude-emacs-lisp.el (defun recompile-init-lisp () + "Recompile elisp files in `user-emacs-directory/lisp'." + (interactive) (when (and (string-prefix-p (expand-file-name "lisp" user-emacs-directory) (file-truename buffer-file-name)) (file-exists-p (byte-compile-dest-file buffer-file-name))) (emacs-lisp-byte-compile))) (defun recompile-init-lisp-on-save () - "Recompile your elc when saving an elisp file. (Adds buffer-local hook)" + "Recompile your elc when saving an elisp file. (Adds buffer-local hook)." (add-hook 'after-save-hook 'recompile-init-lisp nil t)) ;; From prelude-emacs-lisp.el (defun visit-ielm () |