adding comment.

This commit is contained in:
Kazu Yamamoto 2013-03-05 15:26:33 +09:00
parent a884e3444e
commit dc0519b16d

View File

@ -31,6 +31,8 @@
(add-to-list 'flymake-err-line-patterns (add-to-list 'flymake-err-line-patterns
ghc-flymake-err-line-patterns) ghc-flymake-err-line-patterns)
;; flymake of Emacs 23 or later does not display errors
;; if they occurred in other files. So, let's cheat flymake.
(defun ghc-emacs23-larter-hack (tmp-file) (defun ghc-emacs23-larter-hack (tmp-file)
(let ((real-name (flymake-get-real-file-name tmp-file)) (let ((real-name (flymake-get-real-file-name tmp-file))
(hack-name (flymake-get-real-file-name source-file-name))) (hack-name (flymake-get-real-file-name source-file-name)))