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

[Daniel Colascione]

---
 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