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

testing/examples/babel.org

@@ -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:

testing/lisp/test-ob-lob.el

@@ -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)