summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--.emacs.d/init.el25
1 files changed, 17 insertions, 8 deletions
diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index f4d7259..4adcf4a 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -312,14 +312,23 @@ microphone) instead of the default sink."
(require 'cl-macs)
- (defadvice compilation-start
- (around inhibit-display
- (command &optional mode name-function highlight-regexp))
- (if (not (string-match "^\\(find\\|grep\\)" command))
- (cl-letf (((symbol-function 'display-buffer) #'ignore))
- (save-window-excursion ad-do-it))
- ad-do-it))
- (ad-activate 'compilation-start))
+ ;; (advice-add
+ ;; #'compilation-start
+ ;; :around
+ ;; (lambda (orig-fun command &rest rest)
+ ;; (if (not (string-match "^\\(find\\|grep\\)" command))
+ ;; (cl-letf (((symbol-function 'display-buffer) #'ignore))
+ ;; (save-window-excursion (apply orig-fun command rest)))
+ ;; (apply orig-fun command rest))))
+ ;; (defadvice compilation-start
+ ;; (around inhibit-display
+ ;; (command &optional mode name-function highlight-regexp))
+ ;; (if (not (string-match "^\\(find\\|grep\\)" command))
+ ;; (cl-letf (((symbol-function 'display-buffer) #'ignore))
+ ;; (save-window-excursion ad-do-it))
+ ;; ad-do-it))
+ ;; (ad-activate 'compilation-start)
+ )
(with-eval-after-load 'isearch
(setq