1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-07 20:54:32 +00:00

(fast-lock-cache-name): Fix test for `windows-nt'.

This commit is contained in:
Karl Heuer 1999-05-14 08:47:12 +00:00
parent 33d17698ff
commit cb641d1860

View File

@ -552,7 +552,7 @@ See `fast-lock-cache-directory'."
(concat buffer-file-name ".flc")
(let* ((bufile (expand-file-name buffer-file-truename))
(chars-alist
(if (memq system-type '(emx windowsnt))
(if (memq system-type '(emx windows-nt))
'((?/ . (?#)) (?# . (?# ?#)) (?: . (?\;)) (?\; . (?\; ?\;)))
'((?/ . (?#)) (?# . (?# ?#)))))
(mapchars