[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 8a2f763: * lisp/server.el (server-ensure-safe-dir):
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] master 8a2f763: * lisp/server.el (server-ensure-safe-dir): Revert part of b663c8372495 |
Date: |
Thu, 18 Jul 2019 11:10:10 -0400 (EDT) |
branch: master
commit 8a2f763e5cc0ed5b5eecd6a315ac45310bc7a2dd
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>
* 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 3435702..d491a26 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))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 8a2f763: * lisp/server.el (server-ensure-safe-dir): Revert part of b663c8372495,
Stefan Monnier <=