[nongnu] elpa/bash-completion 18ed1504ce 274/313: Add test cases for TRAMP shell.

[ELPA Syncer]

branch: elpa/bash-completion
commit 18ed1504ce9be60c450beb54513c75d7b5e260d9
Author: Stephane Zermatten <szermatt@gmx.net>
Commit: Stephane Zermatten <szermatt@gmx.net>

    Add test cases for TRAMP shell.
    
    This change adds some simple test cases to cover TRAMP, using /sg: so
    there's no need to setup anything special to login to.
---
 test/bash-completion-integration-test.el | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)

diff --git a/test/bash-completion-integration-test.el 
b/test/bash-completion-integration-test.el
index be9765f5aa..744b1083c6 100644
--- a/test/bash-completion-integration-test.el
+++ b/test/bash-completion-integration-test.el
@@ -538,4 +538,25 @@ $ ")))))
    (let ((default-directory "/does-not-exist/"))
      (should (equal "ls some/" (bash-completion_test-complete "ls so"))))))
 
+(ert-deftest bash-completion-integration-tramp-single-process ()
+  (bash-completion_test-harness
+   ""  ; .bashrc
+   nil ; use-separate-process
+   (let ((default-directory (concat "/sg:localhost:" default-directory)))
+     (bash-completion_test-with-shell
+      (should (file-remote-p default-directory))
+      (let ((default-directory "/does-not-exist/"))
+        (should (equal "ls some/"
+                       (bash-completion_test-complete "ls so"))))))))
+
+(ert-deftest bash-completion-integration-tramp-separate-process ()
+  (bash-completion_test-harness
+   ""  ; .bashrc
+   t ; use-separate-process
+   (let ((default-directory (concat "/sg:localhost:" default-directory)))
+     (bash-completion_test-with-shell
+      (should (file-remote-p default-directory))
+      (should (equal "ls some/"
+                     (bash-completion_test-complete "ls so")))))))
+
 ;;; bash-completion-integration-test.el ends here