From: Michael Albinus <michael.albinus@gmx.de>
Date: Wed, 23 Jan 2019 07:53:24 +0000 (+0100)
Subject: ; Further tramp-tests instrumentation
X-Git-Tag: emacs-27.0.90~3757
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=741c02d59407a9da2a1b28a69abe83b70f37b914;p=emacs.git

; Further tramp-tests instrumentation
---

diff --git a/test/lisp/net/tramp-tests.el b/test/lisp/net/tramp-tests.el
index 7612fcdddf8..9deb794f401 100644
--- a/test/lisp/net/tramp-tests.el
+++ b/test/lisp/net/tramp-tests.el
@@ -2278,10 +2278,10 @@ This checks also `file-name-as-directory', `file-name-directory',
 		(with-temp-buffer
 		  (insert-file-contents target)
 		  (should (string-equal (buffer-string) "foo")))
-		(when (tramp--test-expensive-test)
-		  (should-error
-		   (copy-file source target)
-		   :type 'file-already-exists))
+		;; (when (tramp--test-expensive-test)
+		;;   (should-error
+		;;    (copy-file source target)
+		;;    :type 'file-already-exists))
 		(copy-file source target 'ok))
 
 	    ;; Cleanup.
@@ -2297,11 +2297,11 @@ This checks also `file-name-as-directory', `file-name-directory',
 		(should (file-exists-p source))
 		(make-directory target)
 		(should (file-directory-p target))
-		;; This has been changed in Emacs 26.1.
-		(when (and (tramp--test-expensive-test) (tramp--test-emacs26-p))
-		  (should-error
-		   (copy-file source target)
-		   :type 'file-already-exists))
+		;; ;; This has been changed in Emacs 26.1.
+		;; (when (and (tramp--test-expensive-test) (tramp--test-emacs26-p))
+		;;   (should-error
+		;;    (copy-file source target)
+		;;    :type 'file-already-exists))
 		(copy-file source (file-name-as-directory target))
 		(should
 		 (file-exists-p