test-ob.el: Remove duplicate test
This commit is contained in:
parent
ce0f5c3beb
commit
0d7cf4e402
|
@ -1178,30 +1178,6 @@ echo \"test\"
|
||||||
(should (re-search-forward "=\"x\"=" nil t))
|
(should (re-search-forward "=\"x\"=" nil t))
|
||||||
(forward-line))))
|
(forward-line))))
|
||||||
|
|
||||||
(ert-deftest test-ob/commented-last-block-line-with-var ()
|
|
||||||
(org-test-with-temp-text-in-file "
|
|
||||||
#+begin_src emacs-lisp :var a=1
|
|
||||||
;;
|
|
||||||
#+end_src"
|
|
||||||
(org-babel-next-src-block)
|
|
||||||
(org-babel-execute-maybe)
|
|
||||||
(re-search-forward "\\#\\+results:" nil t)
|
|
||||||
(forward-line)
|
|
||||||
(should (string=
|
|
||||||
""
|
|
||||||
(buffer-substring-no-properties (point-at-bol) (point-at-eol)))))
|
|
||||||
(org-test-with-temp-text-in-file "
|
|
||||||
#+begin_src emacs-lisp :var a=2
|
|
||||||
2;;
|
|
||||||
#+end_src"
|
|
||||||
(org-babel-next-src-block)
|
|
||||||
(org-babel-execute-maybe)
|
|
||||||
(re-search-forward "\\#\\+results:" nil t)
|
|
||||||
(forward-line)
|
|
||||||
(should (string=
|
|
||||||
": 2"
|
|
||||||
(buffer-substring-no-properties (point-at-bol) (point-at-eol))))))
|
|
||||||
|
|
||||||
(defun test-ob-verify-result-and-removed-result (result buffer-text)
|
(defun test-ob-verify-result-and-removed-result (result buffer-text)
|
||||||
"Test helper function to test `org-babel-remove-result'.
|
"Test helper function to test `org-babel-remove-result'.
|
||||||
A temp buffer is populated with BUFFER-TEXT, the first block is executed,
|
A temp buffer is populated with BUFFER-TEXT, the first block is executed,
|
||||||
|
|
Loading…
Reference in New Issue