Browse Source

a test exercising org-babel-comint-with-output

* testing/lisp/test-ob-sh.el (test-ob-sh/session): Shell session
  execution uses this function which was not previously tested.
Eric Schulte 12 years ago
parent
commit
d0665bb322
1 changed files with 7 additions and 0 deletions
  1. 7 0
      testing/lisp/test-ob-sh.el

+ 7 - 0
testing/lisp/test-ob-sh.el

@@ -25,6 +25,13 @@ unless the body of the tangled block does."
 returned empty results."
   (should (null (org-babel-execute:sh "ls NoSuchFileOrDirectory.txt" nil))))
 
+(ert-deftest test-ob-sh/session ()
+  "This also tests `org-babel-comint-with-output' in
+ob-comint.el, which was not previously tested."
+  (let ((res (org-babel-execute:sh "echo 1; echo 2" '((:session . "yes")))))
+    (should res)
+    (should (listp res))))
+
 (provide 'test-ob-sh)
 
 ;;; test-ob-sh.el ends here