tests: more thorough testing of inline call lines -- passing all tests

This commit is contained in:
Eric Schulte 2011-06-25 15:06:46 -07:00
parent 7cfca9a969
commit 328202cf62
2 changed files with 10 additions and 1 deletions

View file

@ -1,4 +1,5 @@
#+Title: a collection of examples for Babel tests
#+OPTIONS: ^:nil
* =:noweb= header argument expansion
:PROPERTIES:
@ -152,6 +153,8 @@
#+call: echo[:var input="testing"]() :results vector
#+call: echo("testing")
#+call: echo("testing") :results vector
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.
* parsing header arguments
:PROPERTIES:

View file

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