anchor.diff:  -behaviour(gen_server).
   
   %% API
  --export([start_modulegraph_server/0, get_client_files/2]).
  +-export([start_modulegraph_server/0, get_client_files/2, get_called_modules/2]).
   
   %% gen_server callbacks
   -export([init/1, handle_call/3, handle_cast/2, handle_info/2,
  
positive.code: 
  
  get_client_files(File, SearchPaths) ->
      gen_server:call(wrangler_modulegraph_server, {get, File, SearchPaths}, 5000000).
  %%====================================================================
  %% gen_server callbacks
  %%====================================================================
  
negative.code: %%                                      {stop, Reason, State}
  %% Description: Handling call messages
  %%--------------------------------------------------------------------
  handle_call({get_client_files, File, SearchPaths}, _From, State) ->
      ModuleGraph = refac_module_graph:module_graph(SearchPaths),
      ClientFiles = case lists:keysearch(File, 1, ModuleGraph) of
  		      {value, {_, Clients}} -> 
  			  lists:delete(File, Clients);
  		      false -> []
  		  end,
      {reply, ClientFiles, State};
  
  handle_call({get_called_modules, File, SearchPaths}, _From, State) ->
      CalledMods = refac_module_graph:get_called_mods(File, SearchPaths),
      {reply, CalledMods, State}.
  %%--------------------------------------------------------------------
  %% Function: handle_cast(Msg, State) -> {noreply, State} |
  %%                                      {noreply, State, Timeout} |
  