Re: How to edit compilation-error-regexp-alist in .emacs file?

[Siegfried Heintze]

I found an example of eval-after-load in the perl module and tried to modify
it for me.

Why does this not work?
(if (fboundp 'eval-after-load)
    (eval-after-load
     "mode-compile"
     '(progn (setcar (car compilation-error-regexp-alist) (concat
"\\(\\[Error\\] \\|\\[Fatal Error\\] \\)?"  (caar
compilation-error-regexp-alist)))
  (setcdr (car compilation-error-regexp-alist) '(3 4 7))
     (push '("^\\([-_a-zA-Z0-9]+\\.[-_a-zA-Z0-9]+\\)[ \t]*([
\t]*\\([0-9]+\\)[ \t]*,[ \t]*\\([0-9]+\\)[ \t]*)[ \t]*:[
\t]*\\(error\\|fatal error\\|warning\\)[ \t]+\\([^ ]+\\):"  1 2 3)
compilation-error-regexp-alist))  )  )