anchor.diff:                              {Modules, NewErrs ++ Errors}
                       end;
                   false ->
  +		    lager:info("Compile App: ~p File: ~p " , [Application, Filename]),
                       case maybe_compile(Filename, Application, OutDir, Compiler) of
                           ok ->
                               {Modules, Errors};
  
positive.code:     end.
  
  load_dir(Dir, Application, OutDir, Compiler) when is_function(Compiler) ->
      Files = case file:list_dir(Dir) of
          {ok, FileList} ->
              FileList;
          _ ->
              []
      end,
      FullFiles = lists:map(fun(F) -> filename:join([Dir, F]) end, Files),
      {ModuleList, ErrorList} = compile_and_accumulate_errors(
          FullFiles, Application, OutDir, Compiler, {[], []}),
  
negative.code:             {ok, ModuleList};
          _ ->
              {error, ErrorList}
      end.
  
  %% Only serve files that end in ".erl"
  list_files(Dir) ->
      case file:list_dir(Dir) of
  	{ok, FileList} ->
  	   lists:filter(fun(String) ->
  				string:right(String, 4) == ".erl"
  			end, FileList);
  	_ ->
  	    []
      end.
  
  compile_and_accumulate_errors([], _Application, _OutDir, _Compiler, Acc) -> 
  