/[emacs]/emacs/lisp/international/mule.el
ViewVC logotype

Diff of /emacs/lisp/international/mule.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.176 by handa, Fri Jan 24 13:28:00 2003 UTC revision 1.177 by lektu, Fri Jan 31 15:20:13 2003 UTC
# Line 1631  This is used for loading and byte-compil Line 1631  This is used for loading and byte-compil
1631  (defun auto-coding-alist-lookup (filename)  (defun auto-coding-alist-lookup (filename)
1632    "Return the coding system specified by `auto-coding-alist' for FILENAME."    "Return the coding system specified by `auto-coding-alist' for FILENAME."
1633    (let ((alist auto-coding-alist)    (let ((alist auto-coding-alist)
1634          (case-fold-search (memq system-type '(vax-vms windows-nt ms-dos)))          (case-fold-search (memq system-type '(vax-vms windows-nt ms-dos cygwin)))
1635          coding-system)          coding-system)
1636      (while (and alist (not coding-system))      (while (and alist (not coding-system))
1637        (if (string-match (car (car alist)) filename)        (if (string-match (car (car alist)) filename)

Legend:
Removed from v.1.176  
changed lines
  Added in v.1.177

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26