test-ob-ruby.el 1.3 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849
  1. ;;; test-ob-ruby.el --- tests for ob-ruby.el
  2. ;; Copyright (c) 2013 Oleh Krehel
  3. ;; Authors: Oleh Krehel
  4. ;; This program is free software; you can redistribute it and/or modify
  5. ;; it under the terms of the GNU General Public License as published by
  6. ;; the Free Software Foundation, either version 3 of the License, or
  7. ;; (at your option) any later version.
  8. ;; This program is distributed in the hope that it will be useful,
  9. ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  10. ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  11. ;; GNU General Public License for more details.
  12. ;; You should have received a copy of the GNU General Public License
  13. ;; along with this program. If not, see <http://www.gnu.org/licenses/>.
  14. ;;; Code:
  15. (org-test-for-executable "ruby")
  16. (unless (featurep 'ob-ruby)
  17. (signal 'missing-test-dependency "Support for Ruby code blocks"))
  18. (ert-deftest test-ob-ruby/session-output ()
  19. (should (equal (org-test-with-temp-text "#+begin_src ruby :session :results output
  20. s = \"1\"
  21. s = \"2\"
  22. s = \"3\"
  23. puts s
  24. #+end_src"
  25. (org-ctrl-c-ctrl-c)
  26. (substring-no-properties
  27. (buffer-string)))
  28. "#+begin_src ruby :session :results output
  29. s = \"1\"
  30. s = \"2\"
  31. s = \"3\"
  32. puts s
  33. #+end_src
  34. #+RESULTS:
  35. :
  36. : 3
  37. ")))
  38. (provide 'test-ob-ruby)
  39. ;;; test-ob-ruby.el ends here