anchor.diff:    erlang:error ({badconfig, A}).
   
   pid_file () ->
  -  filename:join(["","tmp",lists:concat(["rrdcached-",os:getpid(),".pid"])]).
  +  gen_server:call (?MODULE, pid_file).
   
   listen_file () ->
  -  filename:join(["","tmp",lists:concat(["rrdcached-",os:getpid(),".sock"])]).
  +  gen_server:call (?MODULE, listen_file).
   
   alive () ->
     case os:cmd (lists:concat (["kill -0 `cat ",pid_file (),"`"])) of
  
positive.code:   process_config (Rest, Command, [ " -F " | Args ]);
  process_config ([foreground|Rest], Command, Args) ->
    process_config (Rest, Command, [ " -g " | Args ]);
  process_config ([{root_dir,V}|Rest], Command, Args) ->
    process_config (Rest, Command, [ " -b ", V | Args ]);
  process_config ([writes_only_in_root|Rest], Command, Args) ->
    process_config (Rest, Command, [ " -B " | Args ]);
  
negative.code: 
  terminate({port_terminated, _Reason}, _State) ->
    ok;
  terminate(_Reason, #state{port = Port, pid_file = PidFile} = _State) ->
    port_close(Port),
    os:cmd (lists:concat(["kill -9 `cat ",PidFile,"`"])),
    ok.
  
  code_change (_OldVsn, State, _Extra) ->
  