Mercurial > dotfiles

view .elisp/settings/50.compilation-tweaks.el @ 351:bef29d49d19f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
safe-paste: adds support for bracketed paste mode to zsh Since I don't use oh-my-zsh, just import their code directly with a reference. Based on the site where I learned about this [0], it's originally from [1], and I downloaded it from [2]. 0: https://cirw.in/blog/bracketed-paste 1: http://www.zsh.org/mla/users/2011/msg00367.html 2: https://raw.githubusercontent.com/robbyrussell/oh-my-zsh/master/plugins/safe-paste/safe-paste.plugin.zsh
author Augie Fackler <raf@durin42.com>
date Mon, 10 Nov 2014 09:26:04 -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))))