]> git.eshelyaron.com Git - emacs.git/commitdiff
Complete change of ert-remote-temporary-file-directory
authorMichael Albinus <michael.albinus@gmx.de>
Sat, 6 Jan 2024 17:15:23 +0000 (18:15 +0100)
committerMichael Albinus <michael.albinus@gmx.de>
Sat, 6 Jan 2024 17:15:23 +0000 (18:15 +0100)
* lisp/emacs-lisp/ert-x.el: Adapt comment.

* test/lisp/net/tramp-tests.el (ert-remote-temporary-file-directory):
Make it a defvar.

lisp/emacs-lisp/ert-x.el
test/lisp/net/tramp-tests.el

index a6d2fe4a1daaa14254aa9142ebf5ab03727931fe..cd60f9f457f327b010091aa46ca4fd6de2907389 100644 (file)
@@ -540,7 +540,7 @@ The same keyword arguments are supported as in
 (when (and (featurep 'tramp) (getenv "EMACS_HYDRA_CI"))
   (add-to-list 'tramp-remote-path 'tramp-own-remote-path))
 
-;; If this defconst is used in a test file, `tramp' shall be loaded
+;; If this defvar is used in a test file, `tramp' shall be loaded
 ;; prior `ert-x'.  There is no default value on w32 systems, which
 ;; could work out of the box.
 (defvar ert-remote-temporary-file-directory
index 3216a8be1b0ae96c51cf9bca9e4f5b720aba31c6..91b0542c759a3613e7eac950516ab849a237a961 100644 (file)
@@ -134,7 +134,7 @@ A resource file is in the resource directory as per
   (eval-and-compile
     ;; There is no default value on w32 systems, which could work out
     ;; of the box.
-    (defconst ert-remote-temporary-file-directory
+    (defvar ert-remote-temporary-file-directory
       (cond
        ((getenv "REMOTE_TEMPORARY_FILE_DIRECTORY"))
        ((eq system-type 'windows-nt) null-device)