Mercurial > emacs
changeset 9777:178a3bf170f3
(abbreviate-file-name): Handle drive letters on windows-nt as on ms-dos.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Tue, 01 Nov 1994 05:48:21 +0000 |
| parents | b25efd6c4f30 |
| children | 7641fc43ca94 |
| files | lisp/files.el |
| diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/files.el Tue Nov 01 05:46:57 1994 +0000 +++ b/lisp/files.el Tue Nov 01 05:48:21 1994 +0000 @@ -597,7 +597,8 @@ ;; If the home dir is just /, don't change it. (not (and (= (match-end 0) 1) (= (aref filename 0) ?/))) - (not (and (eq system-type 'ms-dos) + (not (and (or (eq system-type 'ms-dos) + (eq system-type 'windows-nt)) (save-match-data (string-match "^[a-zA-Z]:/$" filename))))) (setq filename