X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/dacbc44ca3fc825c9e5ffa799f1a0937c1da0020..54fe3b6ec0557941c5759523b36bfdec21003f77:/lisp/dos-fns.el

diff --git a/lisp/dos-fns.el b/lisp/dos-fns.el
index 7d81398aa4..7188ae0bce 100644
--- a/lisp/dos-fns.el
+++ b/lisp/dos-fns.el
@@ -1,6 +1,6 @@
 ;;; dos-fns.el --- MS-Dos specific functions
 
-;; Copyright (C) 1991, 1993, 1995-1996, 2001-2013 Free Software
+;; Copyright (C) 1991, 1993, 1995-1996, 2001-2016 Free Software
 ;; Foundation, Inc.
 
 ;; Maintainer: Morten Welinder <terra@diku.dk>
@@ -98,7 +98,7 @@ sure to obey the 8.3 limitations."
 			    string))
 	      (aset string i ?_))
 	    ;; If we don't have a period in the first 8 chars, insert one.
-	    ;; This enables to have 3 more characters from the original
+	    ;; This enables having 3 more characters from the original
 	    ;; name in the extension.
 	    (if (> (or (string-match "\\." string) (length string))
 		   8)
@@ -201,8 +201,8 @@ that are used in Emacs Lisp sources; any other file name will be
 returned unaltered."
   (cond
    ;; See files.el:dir-locals-file.
-   ((string= file-name ".dir-locals.el")
-    "_dir-locals.el")
+   ((string= file-name ".dir-locals")
+    "_dir-locals")
    (t
     file-name)))