Mercurial > emacs
diff lisp/files.el @ 19663:cdd578704f28
Fix indentation.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 01 Sep 1997 21:29:44 +0000 |
parents | df1911293a5e |
children | 90127e640713 |
line wrap: on
line diff
--- a/lisp/files.el Mon Sep 01 19:42:16 1997 +0000 +++ b/lisp/files.el Mon Sep 01 21:29:44 1997 +0000 @@ -2742,7 +2742,7 @@ (if (and (eq system-type 'ms-dos) (not (msdos-long-file-names))) (let ((fn (file-name-nondirectory buffer-file-name))) - (string-match "\\`\\([^.]+\\)\\(\\.\\(..?\\)?.?\\|\\)\\'" fn) + (string-match "\\`\\([^.]+\\)\\(\\.\\(..?\\)?.?\\|\\)\\'" fn) (concat (file-name-directory buffer-file-name) "#" (match-string 1 fn) "." (match-string 3 fn) "#"))