如何在emacs中爲自定義編譯命令設置自定義錯誤處理？

Question

我正在使用scons來構建我的C++項目。
我用下一個腳本正確處理scons的的錯誤：

34;;; SCons builds into a 'build' subdir, but we want to find the errors 
35;;; in the regular source dir. So we remove build/XXX/YYY/{dbg,final}/ from the 
36;;; filenames. 
37(defun process-error-filename (filename) 
38 (let ((case-fold-search t)) 
39 (setq f (replace-regexp-in-string 
40    "[Ss]?[Bb]uild[\\/].*\\(final\\|dbg\\)[^\\/]*[\\/]" "" filename)) 
41 (cond ((file-exists-p f) 
42   f) 
43   (t filename)))) 
44 
45(setq compilation-parse-errors-filename-function 'process-error-filename) 

所以。我不想只用C++和scons來使用emacs。但也與Java和其他語言。
如何設置emacs的當我運行

M-x compile 
scons 

命令只能用這個「進程的錯誤文件名」的功能？

Answer 1

您可以使用模式掛鉤
http://www.gnu.org/software/emacs/manual/html_node/emacs/Hooks.html
http://www.gnu.org/software/emacs/manual/html_node/elisp/Creating-Buffer_002dLocal.html

(defun my-c++-mode-hook() 
    (set (make-local-variable 
    'compilation-parse-errors-filename-function) 
    'process-error-filename)) 
(add-hook 'c++-mode-hook 'my-c++-mode-hook)