diff options
author | Achim Gratz <Stromeko@Stromeko.DE> | 2012-09-26 21:35:34 +0200 |
---|---|---|
committer | Achim Gratz <Stromeko@Stromeko.DE> | 2012-09-26 21:35:34 +0200 |
commit | 1653759c25fc2a0d3bc14d61602ee88ad95df466 (patch) | |
tree | 325c3624e4349a5858bd1447139a463f12077cc5 | |
parent | a1e645b2be8d8d41b607c06281f180d69a4c25a1 (diff) | |
download | org-mode-1653759c25fc2a0d3bc14d61602ee88ad95df466.tar.gz |
fix test: BEGIN_ORG / END_ORG has been replaced by BEGIN_SRC org / END_SRC
* testing/lisp/test-ob.el (test-ob/org-babel-remove-result--results-org):
BEGIN_ORG / END_ORG has been replaced by BEGIN_SRC org / END_SRC.
Change test comparison template accordingly.
* testing/lisp/test-ob.el (test-ob/org-babel-remove-result--results-*):
These tests had duplicate definitions, removed the first one of each.
-rw-r--r-- | testing/lisp/test-ob.el | 84 |
1 files changed, 2 insertions, 82 deletions
diff --git a/testing/lisp/test-ob.el b/testing/lisp/test-ob.el index 37ee080..127e1d2 100644 --- a/testing/lisp/test-ob.el +++ b/testing/lisp/test-ob.el @@ -814,86 +814,6 @@ trying to find the :END: marker." (should (search-forward "[[file:foo][bar]]" nil t)) (should (search-forward "[[file:foo][foo]]" nil t)))) -(ert-deftest test-ob/org-babel-remove-result--results-wrap () - "Test `org-babel-remove-result' with :results wrap." - (test-ob-verify-result-and-removed-result - ":RESULTS: -hello there -:END:" - - "* org-babel-remove-result - -#+begin_src emacs-lisp :results wrap -\"hello there\" -#+end_src - -* next heading")) - -(ert-deftest test-ob/org-babel-remove-result--results-org () - "Test `org-babel-remove-result' with :results org." - (test-ob-verify-result-and-removed-result - "#+BEGIN_ORG -* heading -** subheading -content -#+END_ORG" - -"* org-babel-remove-result -#+begin_src emacs-lisp :results org -\"* heading -** subheading -content\" -#+end_src - -* next heading")) - -(ert-deftest test-ob/org-babel-remove-result--results-html () - "Test `org-babel-remove-result' with :results html." - (test-ob-verify-result-and-removed-result - "#+BEGIN_HTML -<head><body></body></head> -#+END_HTML" - -"* org-babel-remove-result -#+begin_src emacs-lisp :results html -\"<head><body></body></head>\" -#+end_src - -* next heading")) - -(ert-deftest test-ob/org-babel-remove-result--results-latex () - "Test `org-babel-remove-result' with :results latex." - (test-ob-verify-result-and-removed-result - "#+BEGIN_LaTeX -Line 1 -Line 2 -Line 3 -#+END_LaTeX" - -"* org-babel-remove-result -#+begin_src emacs-lisp :results latex -\"Line 1 -Line 2 -Line 3\" -#+end_src - -* next heading")) - -(ert-deftest test-ob/org-babel-remove-result--results-code () - "Test `org-babel-remove-result' with :results code." - - (test-ob-verify-result-and-removed-result - "#+BEGIN_SRC emacs-lisp -\"I am working!\" -#+END_SRC" - -"* org-babel-remove-result -#+begin_src emacs-lisp :results code -(message \"I am working!\") -#+end_src - -* next heading")) - (ert-deftest test-ob/org-babel-remove-result--results-pp () "Test `org-babel-remove-result' with :results pp." (test-ob-verify-result-and-removed-result @@ -1009,11 +929,11 @@ hello there (ert-deftest test-ob/org-babel-remove-result--results-org () "Test `org-babel-remove-result' with :results org." (test-ob-verify-result-and-removed-result - "#+BEGIN_ORG + "#+BEGIN_SRC org * heading ** subheading content -#+END_ORG" +#+END_SRC" "* org-babel-remove-result #+begin_src emacs-lisp :results org |