[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/git-commit 71f682770b 3/3: test: Remove magit-toplevel:tra
|
From: |
ELPA Syncer |
|
Subject: |
[nongnu] elpa/git-commit 71f682770b 3/3: test: Remove magit-toplevel:tramp |
|
Date: |
Mon, 1 May 2023 11:11:58 -0400 (EDT) |
branch: elpa/git-commit
commit 71f682770beabb04d99b32973880ccd4b2a3161d
Author: Jonas Bernoulli <jonas@bernoul.li>
Commit: Jonas Bernoulli <jonas@bernoul.li>
test: Remove magit-toplevel:tramp
Yet another attempt to get this working on my machine
just failed and I do not see myself trying again.
---
test/magit-tests.el | 25 -------------------------
1 file changed, 25 deletions(-)
diff --git a/test/magit-tests.el b/test/magit-tests.el
index 89dc61ff29..57797f338a 100644
--- a/test/magit-tests.el
+++ b/test/magit-tests.el
@@ -88,31 +88,6 @@
;; But in the doc-string we say we cannot do it.
(expand-file-name "repo/"))))))
-;; FIXME (ert-deftest magit-toplevel:tramp ()
-;; (cl-letf* ((find-file-visit-truename nil)
-;; ;; Override tramp method so that we don't actually
-;; ;; require a functioning `sudo'.
-;; (sudo-method (cdr (assoc "sudo" tramp-methods)))
-;; ((cdr (assq 'tramp-login-program sudo-method))
-;; (list (if (file-executable-p "/bin/sh")
-;; "/bin/sh"
-;; shell-file-name)))
-;; ((cdr (assq 'tramp-login-args sudo-method)) nil))
-;; (magit-with-test-directory
-;; (setq default-directory
-;; (concat (format "/sudo:%s@localhost:" (user-login-name))
-;; default-directory))
-;; (magit-test-init-repo "repo")
-;; (magit-test-magit-toplevel)
-;; (should (equal (magit-toplevel "repo/.git/")
-;; (expand-file-name "repo/")))
-;; (should (equal (magit-toplevel "repo/.git/objects/")
-;; (expand-file-name "repo/")))
-;; (should (equal (magit-toplevel "repo-link/.git/")
-;; (expand-file-name "repo-link/")))
-;; (should (equal (magit-toplevel "repo-link/.git/objects/")
-;; (expand-file-name "repo/"))))))
-
(ert-deftest magit-toplevel:submodule ()
(let ((find-file-visit-truename nil))
(magit-with-test-directory