# HG changeset patch # User sasha@rocky # Date 1214271253 14400 # Node ID 90354c640342a6ce7d51e75463e6fc37057819fc # Parent b210b509819b166ff6a1cfcc37225106f7b896b9 Prevent error on debian from non-exist `compilation-error-regexp-alist-alist'. diff -r b210b509819b -r 90354c640342 .emacs-my --- a/.emacs-my Fri Jun 06 17:51:38 2008 +0300 +++ b/.emacs-my Mon Jun 23 21:34:13 2008 -0400 @@ -699,12 +699,10 @@ ;; My funny error messages. ;; XXX нужно реализовать через hook. (require 'compile) -(add-to-list 'compilation-error-regexp-alist-alist '(nant "^\\( +\\[csc\\] \\|\\)\\(.*\\)(\\([0-9]*\\),\\([0-9]*\\)):" 2 3 4)) -(add-to-list 'compilation-error-regexp-alist 'nant) -(add-to-list 'compilation-error-regexp-alist-alist '(msvc "^ *\\(.*\\)(\\([0-9]*\\)) +:" 1 2)) -(add-to-list 'compilation-error-regexp-alist 'msvc) -(add-to-list 'compilation-mode-font-lock-keywords '("\\(/[Oo][Uu][Tt]:[^ ]+\\)" . 1)) -(add-to-list 'compilation-mode-font-lock-keywords '("[ ]\\(/F[oe][^ ]+\\)" . 1)) +(add-to-list 'compilation-error-regexp-alist '("^\\( +\\[csc\\] \\|\\)\\(.*\\)(\\([0-9]*\\),\\([0-9]*\\)):" 2 3 4)) +(add-to-list 'compilation-error-regexp-alist '("^ *\\(.*\\)(\\([0-9]*\\)) +:" 1 2)) +;; (add-to-list 'compilation-mode-font-lock-keywords '("\\(/[Oo][Uu][Tt]:[^ ]+\\)" . 1)) +;; (add-to-list 'compilation-mode-font-lock-keywords '("[ ]\\(/F[oe][^ ]+\\)" . 1)) ;; ---------------------------------------------------------------------- ;; asm