Re: Show *compilation* only if build did not succeed

[Amin Bandali]

On 2018-12-22 11:49 AM, Stefan Monnier wrote:
>
> Yes: the two replacements suggested by the warning.
>

Thanks for the reply, Stefan.  I had already tried both, but for some
reason I could not get it to work.  I gave it another shot, and it seems
like I got it right this time around.

For future reference, here’s what I ended up with in my config:

#+begin_src emacs-lisp
(defun amin--compilation-finish-function (buffer outstr)
  (unless (string-match "finished" outstr)
    (switch-to-buffer-other-window buffer))
  t)

(setq compilation-finish-functions #'amin--compilation-finish-function)

(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)
                ((symbol-function 'set-window-point) #'ignore)
                ((symbol-function 'goto-char)        #'ignore))
        (save-window-excursion ad-do-it))
    ad-do-it))

(ad-activate 'compilation-start)
#+end_src

Best,
amin