2016-11-03 13:13:50 +01:00
|
|
|
using Weave
|
2016-04-27 20:52:55 +02:00
|
|
|
using Base.Test
|
|
|
|
|
|
|
|
function mmtest(source, resfile, doctype)
|
|
|
|
weave("documents/$source", out_path = "documents/multimedia/$resfile", doctype=doctype, plotlib=nothing)
|
2016-11-03 11:30:49 +01:00
|
|
|
result = readstring(open("documents/multimedia/$resfile"))
|
|
|
|
ref = readstring(open("documents/multimedia/$resfile.ref"))
|
2016-04-27 20:52:55 +02:00
|
|
|
@test result == ref
|
|
|
|
end
|
|
|
|
|
|
|
|
mmtest("rich_output.jmd", "rich_output.md", "pandoc")
|
|
|
|
mmtest("rich_output.jmd", "rich_output.tex", "tex")
|