From ca128d75562a3549c08c18cc94be7c1a8cb58f02 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sun, 11 Apr 1999 16:26:11 +0000 Subject: [PATCH] (auto-coding-alist-lookup): Include ms-dos in the list of case-insensitive filesystems. --- lisp/international/mule.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/international/mule.el b/lisp/international/mule.el index 9087aa1c933..b9647b75b1c 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el @@ -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))) coding-system) (while (and alist (not coding-system)) (if (string-match (car (car alist)) filename) -- 2.39.2