test: explicitly testing inline call lines at the beginning of a line

This commit is contained in:
Eric Schulte 2011-06-25 17:46:57 -07:00
parent dceaf7da4f
commit 8d7d4428cc
2 changed files with 5 additions and 1 deletions

View file

@ -156,6 +156,7 @@
This is an inline call call_echo(input="testing") embedded in prose.
This is an inline call call_echo(input="testing")[:results vector] embedded in prose.
#+call: lob-minus(8, 4)
call_echo("testing")
* parsing header arguments
:PROPERTIES:

View file

@ -56,7 +56,10 @@
(should (string= "testing" (caar (org-babel-lob-execute
(org-babel-lob-get-info)))))
(forward-line 1) (beginning-of-line)
(should (= 4 (org-babel-lob-execute (org-babel-lob-get-info))))))
(should (= 4 (org-babel-lob-execute (org-babel-lob-get-info))))
(forward-line 1)
(should (string= "testing" (org-babel-lob-execute
(org-babel-lob-get-info))))))
(provide 'test-ob-lob)