umgeher/jsx
0
Fork 0
Code Issues Pull requests Activity

intermediate commit on way to eunit

Browse source
This commit is contained in:
alisdair sullivan 2010-08-06 17:55:19 -07:00
parent 57c85a4185
commit ca1d605e95
2 changed files with 6 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/jsx.erl
View file

@ -243,10 +243,10 @@ load_tests([Test|Rest], Dir, Acc) ->
end.
%% if the json, erlang or jsx values are lists, assume they're a path to a file that should
%% if the json, eep0018 or jsx values are lists, assume they're a path to a file that should
%% be read with file:read_file/1
parse_test([{Key, Path}|Rest], Test) when is_list(Path) ->
case lists:member(Key, [json, erlang, jsx]) of
case lists:member(Key, [json, eep0018, jsx]) of
true ->
case file:read_file(Path) of
{ok, Bin} -> parse_test(Rest, [{Key, Bin}] ++ Test)