emacs-diffs
[Top][All Lists]
Advanced

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

master ba7ef9699ff 1/2: End default-directory with slash in eglot-tests


From: Basil L. Contovounesios
Subject: master ba7ef9699ff 1/2: End default-directory with slash in eglot-tests
Date: Mon, 10 Apr 2023 06:04:12 -0400 (EDT)

branch: master
commit ba7ef9699ff21667f8b242e294616f0a255ede22
Author: Basil L. Contovounesios <contovob@tcd.ie>
Commit: Basil L. Contovounesios <contovob@tcd.ie>

    End default-directory with slash in eglot-tests
    
    * test/lisp/progmodes/eglot-tests.el (eglot--call-with-fixture):
    Separate prefix from random part of temporary file name.  Ensure
    default-directory ends with a directory separator (bug#61637).
---
 test/lisp/progmodes/eglot-tests.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/test/lisp/progmodes/eglot-tests.el 
b/test/lisp/progmodes/eglot-tests.el
index 0486c938558..ad0a411189f 100644
--- a/test/lisp/progmodes/eglot-tests.el
+++ b/test/lisp/progmodes/eglot-tests.el
@@ -85,8 +85,8 @@ directory hierarchy."
 
 (defun eglot--call-with-fixture (fixture fn)
   "Helper for `eglot--with-fixture'.  Run FN under FIXTURE."
-  (let* ((fixture-directory (make-nearby-temp-file "eglot--fixture" t))
-         (default-directory fixture-directory)
+  (let* ((fixture-directory (make-nearby-temp-file "eglot--fixture-" t))
+         (default-directory (file-name-as-directory fixture-directory))
          created-files
          new-servers
          test-body-successful-p)



reply via email to

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