Commit ca128d75 authored by Eli Zaretskii's avatar Eli Zaretskii
Browse files

(auto-coding-alist-lookup): Include ms-dos

in the list of case-insensitive filesystems.
parent 75447cdd
......@@ -906,7 +906,7 @@ This is used for loading and byte-compiling Emacs Lisp files.")
(defun auto-coding-alist-lookup (filename)
"Return the coding system specified by `auto-coding-alist' for FILENAME."
(let ((alist auto-coding-alist)
(case-fold-search (memq system-type '(vax-vms windows-nt)))
(case-fold-search (memq system-type '(vax-vms windows-nt ms-dos)))
(while (and alist (not coding-system))
(if (string-match (car (car alist)) filename)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment