ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Merge branch 'maint'

This commit is contained in:
Nicolas Goaziou 2019-05-16 10:44:28 +02:00
parent 2579d88323 be1d65b72f
commit 0b0aa43ef2
1 changed files with 13 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
testing/lisp/test-ob-ruby.el
View File

@ -22,57 +22,58 @@
(signal 'missing-test-dependency "Support for Ruby code blocks")) (signal 'missing-test-dependency "Support for Ruby code blocks"))
(ert-deftest test-ob-ruby/session-output-1 () (ert-deftest test-ob-ruby/session-output-1 ()
(should (equal (org-test-with-temp-text "#+begin_src ruby :session :results output (should (equal (org-test-with-temp-text "#+begin_src ruby :session org-test-ruby :results output
s = \"1\" s = \"1\"
s = \"2\" s = \"2\"
s = \"3\" s = \"3\"
puts s puts s
s = \"4\"
#+end_src" #+end_src"
(org-babel-execute-maybe) (org-babel-execute-maybe)
(substring-no-properties (substring-no-properties
(buffer-string))) (buffer-string)))
"#+begin_src ruby :session :results output "#+begin_src ruby :session org-test-ruby :results output
s = \"1\" s = \"1\"
s = \"2\" s = \"2\"
s = \"3\" s = \"3\"
puts s puts s
s = \"4\"
#+end_src #+end_src
#+RESULTS: #+RESULTS:
: 3 : 3
"))) ")))
(ert-deftest test-ob-ruby/session-output-2 () (ert-deftest test-ob-ruby/session-output-2 ()
(should (equal (org-test-with-temp-text "#+begin_src ruby :session :results output (should (equal (org-test-with-temp-text "#+begin_src ruby :session org-test-ruby :results output
s = \"5\"
puts s puts s
s = \"5\"
#+end_src" #+end_src"
(org-babel-execute-maybe) (org-babel-execute-maybe)
(substring-no-properties (substring-no-properties
(buffer-string))) (buffer-string)))
"#+begin_src ruby :session :results output "#+begin_src ruby :session org-test-ruby :results output
s = \"5\"
puts s puts s
s = \"5\"
#+end_src #+end_src
#+RESULTS: #+RESULTS:
: 5 : 4
"))) ")))
(ert-deftest test-ob-ruby/session-output-3 () (ert-deftest test-ob-ruby/session-output-3 ()
(should (equal (org-test-with-temp-text "#+begin_src ruby :session :results output (should (equal (org-test-with-temp-text "#+begin_src ruby :session org-test-ruby :results output
puts s puts s
s = \"6\"
#+end_src" #+end_src"
(org-babel-execute-maybe) (org-babel-execute-maybe)
(substring-no-properties (substring-no-properties
(buffer-string))) (buffer-string)))
"#+begin_src ruby :session :results output "#+begin_src ruby :session org-test-ruby :results output
puts s puts s
s = \"6\"
#+end_src #+end_src
#+RESULTS: #+RESULTS:
: 5 : 5
"))) ")))
(provide 'test-ob-ruby) (provide 'test-ob-ruby)