summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEric Schulte <schulte.eric@gmail.com>2010-12-13 12:41:55 -0700
committerEric Schulte <schulte.eric@gmail.com>2010-12-13 12:41:55 -0700
commit8efcd4338d192cc926b59199dace96101bb14575 (patch)
tree997886b23a50f6449ee63ef89480a6c1bfdfa2ea
parent4760c3b9482cfeda02d24590e2fb7c70a9c1d0cd (diff)
downloadorg-mode-8efcd4338d192cc926b59199dace96101bb14575.tar.gz
adding test of error when exporting marked subtree with code blocks
-rw-r--r--testing/examples/babel.org15
-rw-r--r--testing/lisp/test-ob-exp.el5
2 files changed, 20 insertions, 0 deletions
diff --git a/testing/examples/babel.org b/testing/examples/babel.org
index 6ca7c2f..506d88b 100644
--- a/testing/examples/babel.org
+++ b/testing/examples/babel.org
@@ -159,3 +159,18 @@
#+begin_src example-lang :session :results output :var num=9
the body
#+end_src
+* conflicting blocks on export
+ :PROPERTIES:
+ :ID: 5daa4d03-e3ea-46b7-b093-62c1b7632df3
+ :END:
+#+results: a-list
+- a
+- b
+- c
+
+#+begin_src emacs-lisp :results wrap :exports both
+ "code block results"
+#+end_src
+#+begin_src emacs-lisp :var lst=a-list :results list
+ (reverse lst)
+#+end_src
diff --git a/testing/lisp/test-ob-exp.el b/testing/lisp/test-ob-exp.el
index 1c2214c..6c7c514 100644
--- a/testing/lisp/test-ob-exp.el
+++ b/testing/lisp/test-ob-exp.el
@@ -95,6 +95,11 @@ elements in the final html."
(should (string-match "<pre.*>[^\000]*</pre>" html))
(should (string-match "<table.*>[^\000]*</table>" html)))))
+(ert-deftest ob-exp/export-subtree ()
+ (org-test-at-id "5daa4d03-e3ea-46b7-b093-62c1b7632df3"
+ (org-mark-subtree)
+ (org-export-as-latex nil)))
+
(provide 'test-ob-exp)
;;; test-ob-exp.el ends here