From: Glenn Morris <rgm@gnu.org>
Date: Sun, 14 Jul 2019 22:18:22 +0000 (-0700)
Subject: Stop wdired tests leaving behind symlink /tmp/emacs1000
X-Git-Tag: emacs-27.0.90~1905
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c3da6fd70734577b5e63a2c56084bbea000c7bce;p=emacs.git

Stop wdired tests leaving behind symlink /tmp/emacs1000

* test/lisp/wdired-tests.el (server-socket-dir): Make effective.
---

diff --git a/test/lisp/wdired-tests.el b/test/lisp/wdired-tests.el
index 6db2e03e752..183e18774fb 100644
--- a/test/lisp/wdired-tests.el
+++ b/test/lisp/wdired-tests.el
@@ -128,6 +128,8 @@ wdired-mode."
 	    (kill-buffer buf)))
 	(delete-directory test-dir t)))))
 
+(defvar server-socket-dir)
+
 (ert-deftest wdired-test-bug34915 ()
   "Test editing when dired-listing-switches includes -F.
 Appended file indicators should not count as part of the file
@@ -150,6 +152,7 @@ wdired-get-filename before and after editing."
             (require 'dired-x)
             (dired-smart-shell-command "mkfifo foopipe")
             (server-force-delete)
+            ;; FIXME?  This seems a heavy-handed way of making a socket.
             (server-start)              ; Add a socket file.
             (kill-buffer buf))
           (dired test-dir)