|
@@ -85,7 +85,6 @@ compile(Binary, Module, Options) when is_binary(Binary) ->
|
|
end;
|
|
end;
|
|
|
|
|
|
compile(File, Module, Options) ->
|
|
compile(File, Module, Options) ->
|
|
- crypto:start(),
|
|
|
|
Context = init_dtl_context(File, Module, Options),
|
|
Context = init_dtl_context(File, Module, Options),
|
|
case parse(File, Context) of
|
|
case parse(File, Context) of
|
|
ok ->
|
|
ok ->
|
|
@@ -165,7 +164,7 @@ is_up_to_date(CheckSum, Context) ->
|
|
({XFile, XCheckSum}, Acc) ->
|
|
({XFile, XCheckSum}, Acc) ->
|
|
case catch M:F(XFile) of
|
|
case catch M:F(XFile) of
|
|
{ok, Data} ->
|
|
{ok, Data} ->
|
|
- case binary_to_list(crypto:sha(Data)) of
|
|
|
|
|
|
+ case binary_to_list(erlang:md5(Data)) of
|
|
XCheckSum ->
|
|
XCheckSum ->
|
|
Acc;
|
|
Acc;
|
|
_ ->
|
|
_ ->
|
|
@@ -191,7 +190,7 @@ parse(File, Context) ->
|
|
{M, F} = Context#dtl_context.reader,
|
|
{M, F} = Context#dtl_context.reader,
|
|
case catch M:F(File) of
|
|
case catch M:F(File) of
|
|
{ok, Data} ->
|
|
{ok, Data} ->
|
|
- CheckSum = binary_to_list(crypto:sha(Data)),
|
|
|
|
|
|
+ CheckSum = binary_to_list(erlang:md5(Data)),
|
|
case parse(CheckSum, Data, Context) of
|
|
case parse(CheckSum, Data, Context) of
|
|
{error, Msg} when is_list(Msg) ->
|
|
{error, Msg} when is_list(Msg) ->
|
|
{error, File ++ ": " ++ Msg};
|
|
{error, File ++ ": " ++ Msg};
|