(abbreviate-file-name): Handle drive letters on windows-nt as on ms-dos.

1 files changed, 2 insertions, 1 deletions

diff --git a/lisp/files.el b/lisp/files.el
index 06c6950b01c..6037b19435d 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -597,7 +597,8 @@ Type \\[describe-variable] directory-abbrev-alist RET for more information."
              ;; 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