]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix problem with wdired test when symlinks cannot be created.
authorJuanma Barranquero <lekktu@gmail.com>
Sun, 16 Jun 2019 19:57:44 +0000 (21:57 +0200)
committerJuanma Barranquero <lekktu@gmail.com>
Sun, 16 Jun 2019 19:57:44 +0000 (21:57 +0200)
* test/lisp/wdired-tests.el (wdired-test-symlink-name):
Skip test if 'make-symbolic-link' fails for whatever reason;
that's not what's being tested.

test/lisp/wdired-tests.el

index dc67796cdedc92bfde5f0f684ec788758379365b..b0beb3c040c2e0bdbcb2b0e0ba469073a8e2568c 100644 (file)
@@ -86,7 +86,11 @@ only the name before the link arrow."
     (let ((buf (find-file-noselect test-dir)))
       (unwind-protect
          (with-current-buffer buf
-            (make-symbolic-link "./bar/baz" link-name)
+            (skip-unless
+             ;; This check is for wdired, not symbolic links, so skip
+             ;; it when make-symbolic-link fails for any reason (like
+             ;; insufficient privileges).
+             (ignore-errors (make-symbolic-link "./bar/baz" link-name) t))
             (revert-buffer)
             (let* ((file-name (dired-get-filename))
                    (dir-part (file-name-directory file-name))