anchor.diff:      {M, F} = Context#dtl_context.reader,
       case catch M:F(File) of
           {ok, Data} ->
  -            CheckSum = binary_to_list(crypto:sha(Data)),
  +            CheckSum = binary_to_list(erlang:md5(Data)),
               parse(CheckSum, Data, Context);
           _ ->
               {error, "reading " ++ File ++ " failed "}
  
positive.code:     end;
      
  compile(File, Module, Options) ->  
      crypto:start(),
      Context = init_dtl_context(File, Module, Options),
      case parse(File, Context) of  
          ok ->
  
negative.code:                             ({XFile, XCheckSum}, Acc) ->
                                  case catch M:F(XFile) of
                                      {ok, Data} ->
                                          case binary_to_list(erlang:md5(Data)) of
                                              XCheckSum ->
                                                  Acc;
                                              _ ->
  