diff options
Diffstat (limited to '.emacs.d/init.el')
-rw-r--r-- | .emacs.d/init.el | 14 |
1 files changed, 10 insertions, 4 deletions
diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 207d6f2..faf5ff5 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -145,6 +145,13 @@ DOT are intentionally being skipped." (interactive) (server-save-buffers-kill-terminal nil)) +(defun oni:compilation-finish-function (buffer str) + "Don't show compilation window if everything went OK." + (unless (string-match-p "exited abnormally" str) + ;;(run-at-time 0.5 nil 'delete-windows-on buffer) + (delete-windows-on buffer) + (message "Compilation successful"))) + (defun oni:compile-el () "Compile the current buffer file if it is an .el file." (let* ((full-file-name (buffer-file-name)) @@ -1048,6 +1055,9 @@ for easy selection." (add-to-list 'auto-mode-alist '("^PKGBUILD$" . shell-script-mode)) (add-to-list 'auto-mode-alist '("^\\.Xmodmap$" . xmodmap-mode)) +(add-to-list 'compilation-finish-functions + 'oni:compilation-finish-function) + (add-to-list 'debug-ignored-errors "^Can't shift all lines enough") (add-to-list 'display-buffer-alist @@ -1090,10 +1100,6 @@ for easy selection." (load custom-file) (load "rudel-loaddefs.el") -(load (expand-file-name "~/quicklisp/slime-helper.el")) - -(load "quick-edit-mode") -(global-set-key (kbd "C-z") 'quick-edit-mode) (provide 'init) |