From 8a2f763e5cc0ed5b5eecd6a315ac45310bc7a2dd Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Thu, 18 Jul 2019 11:10:05 -0400 Subject: [PATCH] * lisp/server.el (server-ensure-safe-dir): Revert part of b663c8372495 A non-cosmetic change that was mistakenly included. --- lisp/server.el | 10 ---------- 1 file changed, 10 deletions(-) diff --git a/lisp/server.el b/lisp/server.el index 3435702a651..d491a260377 100644 --- a/lisp/server.el +++ b/lisp/server.el @@ -535,16 +535,6 @@ Creates the directory if necessary and makes sure: (cl-letf (((default-file-modes) ?\700)) (make-directory dir t)) (setq attrs (file-attributes dir 'integer))) - (let ((olddir (or (getenv "TMPDIR") "/tmp"))) - (when (and (equal dir (format "%s/emacs" (getenv "XDG_RUNTIME_DIR"))) - (file-writable-p olddir)) - (let ((link (format "%s/emacs%d" olddir (user-uid)))) - (unless (file-directory-p link) - ;; We're using the new location, so try and setup a symlink from - ;; the old location, in case we want to use an old emacsclient. - ;; FIXME: Check that it's safe to use! - (make-symbolic-link dir link t))))) - ;; Check that it's safe for use. (let* ((uid (file-attribute-user-id attrs)) (w32 (eq system-type 'windows-nt)) -- 2.39.2