Mercurial > emacs
changeset 19663:cdd578704f28
Fix indentation.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 01 Sep 1997 21:29:44 +0000 |
parents | 791a40c16c0b |
children | d206d8b146dc |
files | lisp/files.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
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) "#"))