Merge pull request #595 from konn/case-sensitivity

Fixed #561
This commit is contained in:
Kazu Yamamoto 2015-09-14 08:34:37 +09:00
commit 2ea1eca519
1 changed files with 1 additions and 1 deletions

View File

@ -170,7 +170,7 @@ nil do not display errors/warnings.
;; If this is a bottleneck for a large code, let's fix. ;; If this is a bottleneck for a large code, let's fix.
(goto-char (point-min)) (goto-char (point-min))
(cond (cond
((string= (file-truename ofile) (file-truename file)) ((file-equal-p ofile file)
(if hole (if hole
(progn (progn
(forward-line (1- line)) (forward-line (1- line))