features/user-directory 6bf8839: ; * test/lisp/user-directory-tests.el: Fix recently added test.

[Stefan Kangas]

branch: features/user-directory
commit 6bf883990dd09fdd2a4e8ee0712299b909b4d329
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>

    ; * test/lisp/user-directory-tests.el: Fix recently added test.
---
 test/lisp/user-directory-tests.el | 14 +++++++++-----
 1 file changed, 9 insertions(+), 5 deletions(-)

diff --git a/test/lisp/user-directory-tests.el 
b/test/lisp/user-directory-tests.el
index 32b10e4..10115e0 100644
--- a/test/lisp/user-directory-tests.el
+++ b/test/lisp/user-directory-tests.el
@@ -98,11 +98,15 @@
 
 (ert-deftest user-directory-tests-user-file/prefer-existing-in-emacs-dir ()
   (with-user-directory-test
-    (ert-with-temp-file conf
-      (should-not (string-match "\\`foo-bar-baz\\'"
-                                (file-name-base
-                                 (user-file 'downloads "foo-bar-baz"
-                                            conf)))))))
+    (ert-with-temp-directory dir
+      (let ((user-emacs-directory dir)
+            (file (expand-file-name "baz" dir)))
+        (with-temp-file file
+          (insert "some data"))
+        (should-not (string-match "\\`foobar123\\'"
+                                  (file-name-base
+                                   (user-file 'cache "foobar123"
+                                              "baz"))))))))
 
 (ert-deftest user-directory-tests-user-file/name-missing ()
   (with-user-directory-test