mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2025-01-05 11:45:52 +00:00
Code

minor test cleanup

Browse Source
This commit is contained in:
Eric Schulte 2010-10-20 14:36:20 -06:00 committed by Dan Davison
parent 60423d2805
commit 6fa1ae974a
2 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
testing/lisp/test-ob-lob.el
View File

@ -33,7 +33,6 @@
"69fbe856-ca9c-4f20-9146-826d2f488c1d"
(move-beginning-of-line 1)
(forward-line 1)
(message (buffer-substring (point-at-bol) (point-at-eol)))
(should (string= "testing" (org-babel-lob-execute
(org-babel-lob-get-info))))
(forward-line 1)

4
testing/lisp/test-ob-sh.el
View File

@ -25,9 +25,9 @@
"Expanded shell bodies should not start with a blank line
unless the body of the tangled block does."
(should-not (string-match "^[\n\r][\t ]*[\n\r]"
(org-babel-expand-body:sh "echo 2" '())))
(org-babel-expand-body:generic "echo 2" '())))
(should (string-match "^[\n\r][\t ]*[\n\r]"
(org-babel-expand-body:sh "\n\necho 2" '()))))
(org-babel-expand-body:generic "\n\necho 2" '()))))
(ert-deftest test-ob-sh/dont-error-on-empty-results ()
"Was throwing an elisp error when shell blocks threw errors and