Skip to content
Newer
Older
100644 19 lines (14 sloc) 361 Bytes
4af4b7b @evanmiller First commit
authored
1 -module(jerome).
2
3 -compile(export_all).
4
5 % Jerome - a rich-text reader/writer
6
7 read(Path, Format) ->
8 {ok, Binary} = file:read_file(Path),
9 case Format of
10 rtf -> jerome_rtf:read(Binary)
11 end.
12
13 write(Ast, Path, Format) ->
14 IOList = case Format of
15 html ->
16 jerome_html:write(Ast)
17 end,
18 file:write_file(Path, IOList).
Something went wrong with that request. Please try again.