Add test related to a5a676e609

* testing/lisp/test-org-element.el: Add test.
2013-03-14 23:11:26 +01:00 · 2013-03-14 23:11:26 +01:00 · c66641e1ea
parent 3ec38f5c06
commit c66641e1ea
1 changed files with 6 additions and 0 deletions
--- a/testing/lisp/test-org-element.el
+++ b/testing/lisp/test-org-element.el
@ -2748,6 +2748,12 @@ Paragraph \\alpha."
       (org-test-with-temp-text "#+DATE: {{{macro}}}"
 	 (progn (search-forward "{")
 		(org-element-type (org-element-context))))))
+  ;; Do not find objects in table rules.
+  (should
+   (eq 'table-row
+       (org-test-with-temp-text "| a | b |\n+---+---+\n| c | d |"
+	 (forward-line)
+	 (org-element-type (org-element-context)))))
  ;; Find objects in parsed affiliated keywords.
  (should
   (eq 'macro