view .elisp/settings/50.compilation-tweaks.el @ 283:533bde18976e

find_dvcs_root: new function to find dvcs root dir more safely This compares the discovered root dir lengths in order to give the most specific repository path possible.
author Augie Fackler <durin42@gmail.com>
date Tue, 27 Mar 2012 13:41:40 -0500
parents 1ba5a7b0a328
children b0264224e2ec
line wrap: on
line source

(require 'compile)

(pushnew
 '(mercurial-test-output-tb
   "\+  File \".*/install/lib/python/\\([^\"]*\\)\", line \\([0-9]*\\)\\(, in .*\\)?$"
    1 2) compilation-error-regexp-alist-alist)
(pushnew
 '(mercurial-check-code-output-tb
   "\+\\(/[^:]+\\):\\([0-9]+\\):$"
    1 2) compilation-error-regexp-alist-alist)
;; add to the end so this gets priority
(setq compilation-error-regexp-alist
      (append compilation-error-regexp-alist '(mercurial-test-output-tb)))
(setq compilation-error-regexp-alist
      (append compilation-error-regexp-alist '(mercurial-check-code-output-tb)))

;; Use the next s-exp to remove the last list element if you need to
;; live-edit this regex
;; (setq compilation-error-regexp-alist-alist
;;         (cdr compilation-error-regexp-alist-alist))
;; (setq compilation-error-regexp-alist
;;         (reverse (cdr (reverse compilation-error-regexp-alist))))