anchor.diff:  move_fun(FName, Line, Col, TargetModorFileName, CreateNewFile, SearchPaths, TabWidth, Editor) ->
       ?wrangler_io("\nCMD: ~p:move_fun(~p, ~p, ~p, ~p, ~p, ~p, ~p).",
   		 [?MODULE, FName, Line, Col, TargetModorFileName, CreateNewFile, SearchPaths, TabWidth]),
  -    TargetFName = get_target_file_name(FName, TargetModorFileName),
  +    {TargetFName, TargetModName} = get_target_file_mod_name(FName, TargetModorFileName),
       case TargetFName of 
   	FName -> {error, "The target module is the same as the current module."};
   	{error, Reason} -> {error, Reason};
  
positive.code: 			     {value, {fun_def, {ModName, FunName, Arity, _Pos1, _Pos2}}} =
  				 lists:keysearch(fun_def, 1, refac_syntax:get_ann(Def)),
  			     case not filelib:is_file(TargetFName) andalso (CreateNewFile == t orelse CreateNewFile == true) of
  				 true -> create_new_file(TargetFName, TargetModorFileName);
  				 _ -> ok
  			     end,
  			     R = side_cond_check({ModName, FunName, Arity, Def}, TargetFName, list_to_atom(TargetModorFileName), Def, SearchPaths, TabWidth),
  			     case R of
  				 true ->
  				     {ok, {TargetAnnAST, Info1}} = refac_util:parse_annotate_file(TargetFName, true, SearchPaths, TabWidth),  %% level=
  				     {AnnAST1, TargetAnnAST1} =
  					 do_transformation({AnnAST, Info}, {TargetAnnAST, Info1},
  							   {ModName, FunName, Arity}, TargetModorFileName),
  				     case refac_util:is_exported({FunName, Arity}, Info) of
  					 true ->
  					     ?wrangler_io("\nChecking client modules in the following search paths: \n~p\n", [SearchPaths]),
  					     ClientFiles = lists:delete(TargetFName,
  									refac_util:get_client_files(FName, SearchPaths)),
  					     Results = refactor_in_client_modules(ClientFiles,
  										  {ModName, FunName, Arity}, TargetModorFileName, SearchPaths, TabWidth),
  					     case Editor of
  						 emacs ->
  						     refac_util:write_refactored_files([{{FName, FName}, AnnAST1},
  
negative.code: 	     end
      end.
  
  get_target_file_mod_name(CurrentFName, TargetModorFileName) ->
      ErrMsg = {error, "Illegal target module/file name."},
      TargetModName = case filename:extension(TargetModorFileName) of 
  			".erl" -> filename:basename(TargetModorFileName, ".erl");
  