diff options
author | Aaron Ecay <aaronecay@gmail.com> | 2013-04-01 01:42:22 -0400 |
---|---|---|
committer | Eric Schulte <schulte.eric@gmail.com> | 2013-04-03 09:17:17 -0600 |
commit | 252238a60d28f1a77b2688001e11f7e9586ded5a (patch) | |
tree | 6fa82a05860c1ae881b4a5887ac3024ed13a96ab | |
parent | cd9d3d948e038f0bb1230b4336663bd61a891f18 (diff) | |
download | org-mode-252238a60d28f1a77b2688001e11f7e9586ded5a.tar.gz |
Fix testing/lisp/test-ob-emacs-lisp.el
* testing/lisp/test-ob-emacs-lisp.el: Move stray test inside ert-deftest
-rw-r--r-- | testing/lisp/test-ob-emacs-lisp.el | 19 |
1 files changed, 11 insertions, 8 deletions
diff --git a/testing/lisp/test-ob-emacs-lisp.el b/testing/lisp/test-ob-emacs-lisp.el index 94092e4..d03f048 100644 --- a/testing/lisp/test-ob-emacs-lisp.el +++ b/testing/lisp/test-ob-emacs-lisp.el @@ -62,17 +62,20 @@ (should (string= "" (buffer-substring-no-properties (point-at-bol) (point-at-eol)))))) -(org-test-with-temp-text-in-file " + +(ert-deftest ob-emacs-lisp/commented-last-block-line () + (org-test-with-temp-text-in-file " #+begin_src emacs-lisp :var a=2 2;; #+end_src" - (org-babel-next-src-block) - (org-ctrl-c-ctrl-c) - (re-search-forward "results" nil t) - (forward-line) - (should (string= - ": 2" - (buffer-substring-no-properties (point-at-bol) (point-at-eol))))) + (org-babel-next-src-block) + (org-ctrl-c-ctrl-c) + (re-search-forward "results" nil t) + (forward-line) + (should (string= + ": 2" + (buffer-substring-no-properties (point-at-bol) (point-at-eol)))))) + (provide 'test-ob-emacs-lisp) ;;; test-ob-emacs-lisp.el ends here |