anchor.diff:           swap_args/4,
            fold_expr/4,
            gen_fun/6,
  -         move_fun/4]).
  +         move_fun/4,
  +         unfold_fun_app/3]).
   
   -include("../include/wrangler.hrl").
   
  
positive.code: gen_question(move_fun, {SrcFile, F, A, TgtFile}) ->
      M=list_to_atom(filename:basename(SrcFile, ".erl")),
      lists:flatten(io_lib:format("Do you want to move function ~p:~p/~p to file ~p?",
                                   [M,F,A, TgtFile])).
  
  
  swap_args({ModOrFile, FunName, Arity}, Index1, Index2, SearchPaths) ->
  
negative.code:                     [File, F, A, V, new_name_gen(File, F, A, V, NewVarName),
                       SearchPaths, composite_emacs]}, gen_question(rename_var,{File,F,A,V})}
       ||{F, A}<-FAs, V<-get_vars(File, F, A, VarFilter)].
  
  
  unfold_fun_app(ModOrFile, Pos, SearchPaths) ->
      Files= get_files(ModOrFile, SearchPaths),
      Refacs=[unfold_fun_app_1(File, Pos, SearchPaths)
              ||File<-Files],
      lists:append(Refacs).
  
  
  unfold_fun_app_1(File, Pos, SearchPaths) ->
      [{refactoring, {refac_unfold_fun_app, unfold_fun_app,
                      [File, Pos, SearchPaths, composite_emacs], 
                      gen_question(unfold_fun_app, {File, Pos})}}].
  
  get_files(ModOrFile, SearchPaths) ->
      Files = wrangler_misc:expand_files(SearchPaths, ".erl"),    
  