emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] emacs-26 d719ea6 3/3: Another fix for unsafe directory err


From: Noam Postavsky
Subject: [Emacs-diffs] emacs-26 d719ea6 3/3: Another fix for unsafe directory error message (Bug#865)
Date: Sat, 21 Oct 2017 15:50:10 -0400 (EDT)

branch: emacs-26
commit d719ea6ad5419bba2b376384c370dc2744dc718f
Author: Noam Postavsky <address@hidden>
Commit: Noam Postavsky <address@hidden>

    Another fix for unsafe directory error message (Bug#865)
    
    * lisp/server.el (server-ensure-safe-dir): Put file owner's uid, not
    current user's for the wrong owner case.  Show expanded file name in
    error message.
---
 lisp/server.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lisp/server.el b/lisp/server.el
index 33800a9..4c591a5 100644
--- a/lisp/server.el
+++ b/lisp/server.el
@@ -546,14 +546,15 @@ See variable `server-auth-dir' for details."
                               ;; group recorded as the owner.
                               (/= uid 544) (/= (user-uid) 500)))
                      (format "it is not owned by you (owner = %s (%d))"
-                             (user-full-name (user-uid)) (user-uid)))
+                             (user-full-name uid) uid))
                     (w32 nil)           ; on NTFS?
                     ((/= 0 (logand ?\077 (file-modes dir)))
                      (format "it is accessible by others (%03o)"
                              (file-modes dir)))
                     (t nil))))
       (when unsafe
-        (error "`%s' is not a safe directory because %s" dir unsafe)))))
+        (error "`%s' is not a safe directory because %s"
+               (expand-file-name dir) unsafe)))))
 
 (defun server-generate-key ()
   "Generate and return a random authentication key.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]