Prefer \` and \' when matching the beg/end of string

* test/lisp/net/tramp-tests.el (tramp--test-instrument-test-case)
(tramp-test01-file-name-syntax): Use more precise regexp

1 files changed, 3 insertions, 3 deletions

diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el
index 489b682d0c3..4a964f0daf0 100644
--- a/test/lisp/net/tramp-tests.el
+++ b/test/lisp/net/tramp-tests.el
@@ -265,8 +265,8 @@ is greater than 10.
   `(let* ((tramp-verbose (max (or ,verbose 0) (or tramp-verbose 0)))
           (debug-ignored-errors
            (append
-            '("^make-symbolic-link not supported$"
-              "^error with add-name-to-file")
+            '("\\`make-symbolic-link not supported\\'"
+              "\\`error with add-name-to-file")
             debug-ignored-errors))
           inhibit-message)
      (unwind-protect
@@ -379,7 +379,7 @@ is greater than 10.
           (let (tramp-mode)
             (should-not (tramp-tramp-file-p "/method:user@host:")))
           ;; `tramp-ignored-file-name-regexp' suppresses Tramp.
-          (let ((tramp-ignored-file-name-regexp "^/method:user@host:"))
+          (let ((tramp-ignored-file-name-regexp "\\`/method:user@host:"))
             (should-not (tramp-tramp-file-p "/method:user@host:")))
           ;; Methods shall be at least two characters, except the
           ;; default method.