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

testing/examples/babel.org

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

testing/lisp/test-ob-lob.el

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