; * test/lisp/net/tramp-tests.el (tramp--test-enabled): fix regexp

diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el
index 4524d56a9bfd47951c015404d5a8bb761243d775..784ef93f5b7731f5bf96d478b152ceca4a11c6d7 100644 (file)
--- a/test/lisp/net/tramp-tests.el
+++ b/test/lisp/net/tramp-tests.el
@@ -204,7 +204,7 @@ being the result.")
     ;; Remove old test files.
     (dolist (dir `(,temporary-file-directory
                   ,ert-remote-temporary-file-directory))
-      (dolist (file (directory-files dir 'full "^\\(\\.#\\)?tramp-test"))
+      (dolist (file (directory-files dir 'full "\\`\\(\\.#\\)?tramp-test"))
        (ignore-errors
          (if (file-directory-p file)
              (delete-directory file 'recursive)