anchor.diff:      tuple_par_0(FileName, AnnAST, Info, FunName, Arity, Index1, Num, SearchPaths, TabWidth, Editor, "").
   
       
  -tuple_funpar_1(FileName, StartLoc = {StartLine, StartCol}, EndLoc = {EndLine, EndCol}, SearchPaths, TabWidth, Editor) ->
  -    Cmd = "CMD: " ++ atom_to_list(?MODULE) ++ ":tuple_funpar(" ++ "\"" ++ 
  -	    FileName ++ "\", {" ++ integer_to_list(StartLine) ++ ", " ++ integer_to_list(StartCol) ++ "}," ++ 
  -        "{" ++ integer_to_list(EndLine) ++ ", " ++ integer_to_list(EndCol) ++ "}, ["
  -      ++ wrangler_misc:format_search_paths(SearchPaths) ++ "]," ++ integer_to_list(TabWidth) ++ ").",
  +tuple_funpar_1(FileName, StartLoc = {StartLine, StartCol}, EndLoc = {EndLine, EndCol}, SearchPaths, Editor, TabWidth) ->
  +     Cmd = "CMD: " ++ atom_to_list(?MODULE) ++ ":tuple_funpar(" ++ "\"" ++
  +	     FileName ++ "\", {" ++ integer_to_list(StartLine) ++ ", " ++ integer_to_list(StartCol) ++ "}," ++
  +         "{" ++ integer_to_list(EndLine) ++ ", " ++ integer_to_list(EndCol) ++ "}, ["
  +      ++ wrangler_misc:format_search_paths(SearchPaths) ++ "], " ++ atom_to_list(Editor) ++ ", "++
  +        integer_to_list(TabWidth) ++ ").",
       {ok, {AnnAST, Info}} = wrangler_ast_server:parse_annotate_file(FileName, true, SearchPaths, TabWidth),
       {FunName, FunArity, Index, Num} = pos_to_pars(AnnAST, StartLoc, EndLoc),
       tuple_par_0(FileName, AnnAST, Info, FunName, FunArity,
   		Index, Num, SearchPaths, TabWidth, Editor, Cmd).
   
   tuple_funpar(FileName, StartLoc = {StartLine, StartCol}, EndLoc = {EndLine, EndCol},
  -	     SearchPaths, TabWidth, Editor) ->
  -    ?wrangler_io("\nCMD: ~p:tuple_funpar(~p, {~p,~p}, {~p,~p}, ~p, ~p).\n",
  -		 [?MODULE, FileName, StartLine, StartCol, EndLine, EndCol, SearchPaths, TabWidth]),
  -    Cmd = "CMD: " ++ atom_to_list(?MODULE) ++ ":tuple_funpar(" ++ "\"" ++ 
  -	    FileName ++ "\", {" ++ integer_to_list(StartLine) ++ ", " ++ integer_to_list(StartCol) ++ "}," ++ 
  -	      "{" ++ integer_to_list(EndLine) ++ ", " ++ integer_to_list(EndCol) ++ "}, ["
  -      ++ wrangler_misc:format_search_paths(SearchPaths) ++ "]," ++ integer_to_list(TabWidth) ++ ").",
  +	     SearchPaths, Editor, TabWidth) ->
  +     ?wrangler_io("\nCMD: ~p:tuple_funpar(~p, {~p,~p}, {~p,~p}, ~p, ~p, ~p).\n",
  +		  [?MODULE, FileName, StartLine, StartCol, EndLine, EndCol, SearchPaths, Editor, TabWidth]),
  +     Cmd = "CMD: " ++ atom_to_list(?MODULE) ++ ":tuple_funpar(" ++ "\"" ++
  +	     FileName ++ "\", {" ++ integer_to_list(StartLine) ++ ", " ++ integer_to_list(StartCol) ++ "}," ++
  +	       "{" ++ integer_to_list(EndLine) ++ ", " ++ integer_to_list(EndCol) ++ "}, ["
  +      ++ wrangler_misc:format_search_paths(SearchPaths) ++ "], " ++ atom_to_list(Editor) ++ ", " ++
  +        integer_to_list(TabWidth) ++ ").",
       {ok, {AnnAST, Info}} = wrangler_ast_server:parse_annotate_file(FileName, true, SearchPaths, TabWidth),
       {FunName, FunArity, Index, Num} = pos_to_pars(AnnAST, StartLoc, EndLoc),
       NewArity = FunArity - Num + 1,
  
positive.code: 
  -include("../include/wrangler_internal.hrl").
  
  -spec(tuple_funpar/5::(filename(), pos(), pos(), [dir()], integer()) ->
                              {error, string()} | {ok, [filename()]}).
  tuple_funpar(FileName, StartLoc, EndLoc, SearchPaths, TabWidth)->
      tuple_funpar(FileName, StartLoc, EndLoc, SearchPaths, TabWidth, emacs).
  
  
  -spec(tuple_funpar_eclipse/5::(filename(), pos(), pos(), [dir()], integer()) ->
                                      {error, string()} | {ok, [{filename(), filename(), string()}]}).
  tuple_funpar_eclipse(FileName, StartLoc, EndLoc,  SearchPaths, TabWidth)->
      tuple_funpar(FileName, StartLoc, EndLoc, SearchPaths, TabWidth, eclipse).
  
  
  -spec(tuple_funpar_1/5::(filename(), pos(), pos(), [dir()], integer()) ->
                                {error, string()} | {ok, [filename()]}).
  tuple_funpar_1(FileName, StartLoc, EndLoc, SearchPaths, TabWidth)->
      tuple_funpar_1(FileName, StartLoc, EndLoc, SearchPaths, TabWidth, emacs).
  
  
  -spec(tuple_funpar_1_eclipse/5::(filename(), pos(), pos(), [dir()], integer()) ->
                                        {error, string()} | {ok, [filename()]}).
  tuple_funpar_1_eclipse(FileName, StartLoc, EndLoc, SearchPaths, TabWidth)->
      tuple_funpar_1(FileName, StartLoc, EndLoc, SearchPaths, TabWidth, emacs).
  
  tuple_funpar(FileName, Line, Col, Index, Num, SearchPaths, TabWidth) ->
      ?wrangler_io("\nCMD: ~p:tuple_funpar(~p, ~p,~p,~p,~p, ~p, ~p).\n",
  
negative.code: %% @private
  -module(refac_tuple).
  
  -export([tuple_funpar/6, tuple_args/7, tuple_funpar_1/6]).
  -export([tuple_funpar_eclipse/5, tuple_funpar_1_eclipse/5]).
  
  -export([tuple_funpar/7]).  %% For testing purpose.
  