anchor.diff:  handle_call(_Request, _From, State) ->
     Reply = ok,
     {reply, Reply, State}.
  -
  -run_git_command(Args, Cd) ->
  -  Opts = [binary, stderr_to_stdout, use_stdio, exit_status, stream,
  -          {args, Args}, {cd, Cd}],
  -  P = open_port({spawn_executable, os:find_executable('git')}, Opts),
  -  cmd_receive(P).
  -
  -
  -cmd_receive(Port) ->
  -   cmd_receive(Port, []).
  -
  -cmd_receive(Port, Out) ->
  -  receive
  -    {Port, {data, Data}}      ->
  -      List = binary_to_list(Data),
  -      cmd_receive(Port, [List|Out]);
  -    {Port, {exit_status, 0}}  ->
  -      {ok, lists:reverse(Out)};
  -    {Port, {exit_status, N}}  ->
  -      {error, {N, lists:reverse(Out)}};
  -    E ->
  -      cmd_receive(Port, Out)
  -    after 500 ->
  -      % We don't want it to hang infinitely, so if it does, we'll close it off
  -      ok
  -  end.
   
   %%--------------------------------------------------------------------
   %% @private
  
positive.code: %%%===================================================================
  %%% Internal functions
  %%%===================================================================
  
negative.code: 
  -include("common.hrl").
  -define(LOCAL_REPO_ROOT, ?BEEHIVE_HOME ++ "/git_repos").
  
  -record(state, {repo_dir}).
  
  