diff options
| author | Eli Zaretskii | 1999-04-11 16:26:11 +0000 |
|---|---|---|
| committer | Eli Zaretskii | 1999-04-11 16:26:11 +0000 |
| commit | ca128d75562a3549c08c18cc94be7c1a8cb58f02 (patch) | |
| tree | 450b1ed5081e5f3c5b39b4f33dc20ff6fc4726b7 | |
| parent | 75447cdd777d0bd41dcca691b27f2c7a3b892e90 (diff) | |
| download | emacs-ca128d75562a3549c08c18cc94be7c1a8cb58f02.tar.gz emacs-ca128d75562a3549c08c18cc94be7c1a8cb58f02.zip | |
(auto-coding-alist-lookup): Include ms-dos
in the list of case-insensitive filesystems.
| -rw-r--r-- | lisp/international/mule.el | 2 |
1 files changed, 1 insertions, 1 deletions
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.") | |||
| 906 | (defun auto-coding-alist-lookup (filename) | 906 | (defun auto-coding-alist-lookup (filename) |
| 907 | "Return the coding system specified by `auto-coding-alist' for FILENAME." | 907 | "Return the coding system specified by `auto-coding-alist' for FILENAME." |
| 908 | (let ((alist auto-coding-alist) | 908 | (let ((alist auto-coding-alist) |
| 909 | (case-fold-search (memq system-type '(vax-vms windows-nt))) | 909 | (case-fold-search (memq system-type '(vax-vms windows-nt ms-dos))) |
| 910 | coding-system) | 910 | coding-system) |
| 911 | (while (and alist (not coding-system)) | 911 | (while (and alist (not coding-system)) |
| 912 | (if (string-match (car (car alist)) filename) | 912 | (if (string-match (car (car alist)) filename) |