X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/b66d85334bb3f5ce4e6191a2f1f31be84b3c8874..0b64a3da3a1673936bb61a5a9faa103640c66cf9:/lisp/fast-lock.el

diff --git a/lisp/fast-lock.el b/lisp/fast-lock.el
index 859ec239c4..fca1188789 100644
--- a/lisp/fast-lock.el
+++ b/lisp/fast-lock.el
@@ -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