Merge pull request #595 from konn/case-sensitivity

Fixed #561
2015-09-14 08:34:37 +09:00 · 2015-09-14 08:34:37 +09:00 · 2ea1eca519
parent 64379a7c56 74ba886fa1
commit 2ea1eca519
1 changed files with 1 additions and 1 deletions
--- a/elisp/ghc-check.el
+++ b/elisp/ghc-check.el
@ -170,7 +170,7 @@ nil            do not display errors/warnings.
 	  ;; If this is a bottleneck for a large code, let's fix.
 	  (goto-char (point-min))
 	  (cond
-	   ((string= (file-truename ofile) (file-truename file))
+	   ((file-equal-p ofile file)
            (if hole
              (progn
                (forward-line (1- line))