From c32d49e8500570ecf6003a19ed31e9dc977ca437 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Tue, 1 Nov 1994 05:48:21 +0000 Subject: [PATCH] (abbreviate-file-name): Handle drive letters on windows-nt as on ms-dos. --- lisp/files.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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 -- 2.39.5