]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix thinko in Tramp test
authorMichael Albinus <michael.albinus@gmx.de>
Thu, 9 Dec 2021 19:11:40 +0000 (20:11 +0100)
committerMichael Albinus <michael.albinus@gmx.de>
Thu, 9 Dec 2021 19:11:40 +0000 (20:11 +0100)
* test/lisp/net/tramp-tests.el (tramp-test07-abbreviate-file-name):
Fix thinko.

test/lisp/net/tramp-tests.el

index a572ff83d3f995101276a5fd490af9aee9b04100..9c65f9a63513f8af2cf3a1ee9f5cf2e8eaf10fe3 100644 (file)
@@ -239,8 +239,7 @@ is greater than 10.
      (unwind-protect
         (progn ,@body)
        (tramp--test-message
-       "%s %f sec"
-       ,message (float-time (time-subtract nil start))))))
+       "%s %f sec" ,message (float-time (time-subtract nil start))))))
 
 ;; `always' is introduced with Emacs 28.1.
 (defalias 'tramp--test-always
@@ -2291,7 +2290,7 @@ This checks also `file-name-as-directory', `file-name-directory',
   "Check that Tramp abbreviates file names correctly."
   (skip-unless (tramp--test-enabled))
   (skip-unless (tramp--test-emacs29-p))
-  (skip-unless (tramp--test-ange-ftp-p))
+  (skip-unless (not (tramp--test-ange-ftp-p)))
 
   (let* ((remote-host (file-remote-p tramp-test-temporary-file-directory))
         ;; Not all methods can expand "~".