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)
|
2017-03-14 20:27:26 +01:00
|
|
|
VER = "$(VERSION.major).$(VERSION.minor)"
|
2016-04-27 20:52:55 +02:00
|
|
|
weave("documents/$source", out_path = "documents/multimedia/$resfile", doctype=doctype, plotlib=nothing)
|
2017-03-14 20:45:46 +01:00
|
|
|
result = readstring("documents/multimedia/$resfile")
|
|
|
|
ref = readstring("documents/multimedia/$VER/$resfile.ref")
|
2016-04-27 20:52:55 +02:00
|
|
|
@test result == ref
|
2017-03-14 20:27:26 +01:00
|
|
|
rm("documents/multimedia/$resfile")
|
2016-04-27 20:52:55 +02:00
|
|
|
end
|
|
|
|
|
|
|
|
mmtest("rich_output.jmd", "rich_output.md", "pandoc")
|
|
|
|
mmtest("rich_output.jmd", "rich_output.tex", "tex")
|