[PATCH 6/9] Rename `w32' local to `nt' for clarity

[Daniel Colascione <dancol@dancol.org>]

---
 lisp/server.el |    8 ++++----
 1 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/lisp/server.el b/lisp/server.el
index 0ef76dc..656be75 100644
--- a/lisp/server.el
+++ b/lisp/server.el
@@ -519,10 +519,10 @@ Creates the directory if necessary and makes sure:
 
     ;; Check that it's safe for use.
     (let* ((uid (nth 2 attrs))
-	   (w32 (eq system-type 'windows-nt))
+	   (nt (eq system-type 'windows-nt))
 	   (safe (cond
 		  ((not (eq t (car attrs))) nil)  ; is a dir?
-		  ((and w32 (zerop uid))	  ; on FAT32?
+		  ((and nt (zerop uid))	  ; on FAT32?
 		   (display-warning
 		    'server
 		    (format "Using `%s' to store Emacs-server authentication files.
@@ -532,13 +532,13 @@ See variable `server-auth-dir' for details."
 		    :warning)
 		   t)
 		  ((and (/= uid (user-uid))	  ; is the dir ours?
-			(or (not w32)
+			(or (not nt)
 			    ;; Files created on Windows by Administrator
 			    ;; (RID=500) have the Administrators (RID=544)
 			    ;; group recorded as the owner.
 			    (/= uid 544) (/= (user-uid) 500)))
 		   nil)
-		  (w32 t)			  ; on NTFS?
+		  (nt t)			  ; on NTFS?
 		  (t				  ; else, check permissions
 		   (zerop (logand ?\077 (file-modes dir)))))))
       (unless safe
-- 
1.7.2.5