From: Michael Albinus <michael.albinus@gmx.de>
Date: Mon, 11 Jan 2016 18:43:36 +0000 (+0100)
Subject: Minor change in tramp-tests.el
X-Git-Tag: emacs-25.0.90~199
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3adb56e7b2565ff7502bf0e9fb71eba0f82959ac;p=emacs.git

Minor change in tramp-tests.el

* test/automated/tramp-tests.el (tramp-test29-vc-registered):
Use `dired-uncache' instead of a Tramp internal function.
---

diff --git a/test/automated/tramp-tests.el b/test/automated/tramp-tests.el
index 915b30f5e08..a29e42e7343 100644
--- a/test/automated/tramp-tests.el
+++ b/test/automated/tramp-tests.el
@@ -44,6 +44,7 @@
 (require 'vc-git)
 (require 'vc-hg)
 
+(autoload 'dired-uncache "dired")
 (declare-function tramp-find-executable "tramp-sh")
 (declare-function tramp-get-remote-path "tramp-sh")
 (declare-function tramp-get-remote-stat "tramp-sh")
@@ -1660,8 +1661,7 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'."
 			  (list (file-name-nondirectory tmp-name2))))))
 	    ;; vc-git uses an own process sentinel, Tramp's sentinel
 	    ;; for flushing the cache isn't used.
-	    (with-parsed-tramp-file-name tmp-name1 nil
-	      (tramp-flush-directory-property v localname))
+	    (dired-uncache (concat (file-remote-p default-directory) "/"))
 	    (should (vc-registered (file-name-nondirectory tmp-name2)))))
 
       ;; Cleanup.