diff options
author | Tom Willemsen | 2013-02-17 22:23:36 +0100 |
---|---|---|
committer | Tom Willemsen | 2013-02-17 22:23:36 +0100 |
commit | 791d7fd3a2fe6ae4407fe6fe9f2ea86e84dd315c (patch) | |
tree | 1c3c74ce346519386e0b6bc55f9854a9c9bc0842 /.emacs.d/site-lisp/ext.el | |
parent | 3e5421e79d47d4a40b540869f1b18288285e0025 (diff) | |
download | dotfiles-791d7fd3a2fe6ae4407fe6fe9f2ea86e84dd315c.tar.gz dotfiles-791d7fd3a2fe6ae4407fe6fe9f2ea86e84dd315c.zip |
emacs: Close compilation buffer on success
Diffstat (limited to '.emacs.d/site-lisp/ext.el')
-rw-r--r-- | .emacs.d/site-lisp/ext.el | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/.emacs.d/site-lisp/ext.el b/.emacs.d/site-lisp/ext.el index 2ed65d4..d6abaa6 100644 --- a/.emacs.d/site-lisp/ext.el +++ b/.emacs.d/site-lisp/ext.el @@ -38,6 +38,15 @@ buffer-file-name)))) (list "pycheck.sh" (list local-file)))) +(defun ext:comp-finish-function (buf str) + "Don't show compilation window if everything went ok" + (if (string-match "exited abnormally" str) + ;; there were errors + (message "compilation errors, press C-x ` to visit") + ;; no errors, make the compilation window go away in 0.5 seconds + (run-at-time 0.5 nil 'delete-windows-on buf) + (message "No compilation errors!"))) + (defun ext:reload-buffer () "Reload current buffer." (interactive) |