anchor.diff:  	do_transformation(CurModInfo, TargetModInfo, MFAs, {UnDefinedMs, UnDefinedRs},
   			  FunsToExportInCurMod, FunsToExportInTargetMod, Pid,
   			  SearchPaths, TabWidth),
  -    FName = CurModInfo#module_info.filename,
  -    ModName = CurModInfo#module_info.modname,
  -    TargetFName = TargetModInfo#module_info.filename,
  -    TargetModName = TargetModInfo#module_info.modname,
  +    FName = CurModInfo#modinfo.filename,
  +    ModName = CurModInfo#modinfo.modname,
  +    TargetFName = TargetModInfo#modinfo.filename,
  +    TargetModName = TargetModInfo#modinfo.modname,
       check_unsure_atoms(FName, AnnAST1, AtomsToCheck, f_atom, Pid),
       check_unsure_atoms(TargetFName, TargetAnnAST1, AtomsToCheck, f_atom, Pid),
  -    ExportedMFAs = exported_funs(MFAs, CurModInfo#module_info.info),
  +    ExportedMFAs = exported_funs(MFAs, CurModInfo#modinfo.info),
       
       Results = case ExportedMFAs/=[] of
   		  true ->
  
positive.code: 	{ok, AST, {MDefs, _MUses1}} ->
  	    MacroDefs = get_macro_defs(MDefs),
  	    ModInfo = get_mod_info_from_parse_tree(AST),
  	    RecordDefs = case lists:keyfind(records, 1, ModInfo) of
                               {records, RecordDefsInFile} ->
  				 [{Name, lists:keysort(1, [{F, prettyprint(FDef)} || {F, FDef} <- Fields])}
  				  || {Name, Fields} <- RecordDefsInFile];
  			     false -> []
  			 end,
              {ok, {AnnAST, Info}} = wrangler_ast_server:parse_annotate_file(FName, true, SearchPaths, TabWidth),
              Forms = wrangler_syntax:form_list_elements(AnnAST),
  	    Includes = lists:append([lists:flatmap(fun (A) ->
  
negative.code: 	    end
      end.
  
  -spec(check_records/4::(FunDefs::[any()], [{atom(), any()}], [{atom(), any()}], boolean()) -> [atom()]).
  check_records(FunDefs,CurRecordDefs,TargetRecordDefs, CheckCond) ->
      UsedRecords = lists:usort(lists:append([wrangler_misc:collect_used_records(FunDef) || {_, FunDef} <- FunDefs])),
      UsedRecordDefs = [{Name, lists:keysort(1, Fields)} || {Name, Fields} <- CurRecordDefs, lists:member(Name, UsedRecords)],
  