Просмотр исходного кода

ox: Add test

* testing/lisp/test-ox.el (test-org-export/uninterpreted): Add test.
Nicolas Goaziou 5 лет назад
Родитель
Сommit
63e851ddbd
1 измененных файлов с 9 добавлено и 0 удалено
  1. 9 0
      testing/lisp/test-ox.el

+ 9 - 0
testing/lisp/test-ox.el

@@ -847,6 +847,15 @@ Paragraph <2012-03-29 Thu>[2012-03-29 Thu]"
 			     (paragraph . (lambda (p c i) c))
 			     (section . (lambda (s c i) c))))
 	     nil nil nil '(:with-latex verbatim)))))
+  (should
+   (equal "$1$ \n"
+	  (org-test-with-temp-text "$1$ "
+	    (org-export-as
+	     (org-export-create-backend
+	      :transcoders '((latex-fragment . (lambda (l c i) "dummy"))
+			     (paragraph . (lambda (p c i) c))
+			     (section . (lambda (s c i) c))))
+	     nil nil nil '(:with-latex verbatim)))))
   ;; Sub/superscript.
   (should
    (equal "adummy\n"