anchor.diff:  %% @end
   -spec query_state(integer()) -> unknown | {value, [{term(), term()}]}.
   query_state(Id) ->
  -    gen_server:call(?SERVER, {query_state, Id}).
  +    gen_server:call(srv_name(), {query_state, Id}).
   
   -spec srv_name() -> atom().
   srv_name() ->
  
positive.code:     %% Run a persistence operation on all torrents
      %% TODO - in the ETS implementation the state of all inactive
      %%        torrents was flushed out on each persitance operation.
      _ = [begin
          TorentID = proplists:get_value(id, Props)
          Filename = proplists:get_value(filename, Props),
          track_torrent(TorrentID, Filename)
      end || Props <- etorrent_table:all_torrents()],
      ok.
  
      {reply, ok, State}.
  
  handle_cast(_, State) ->
  
negative.code: %% @end
  -spec start_link() -> {ok, pid()} | ignore | {error, term()}.
  start_link() ->
      gen_server:start_link({local, srv_name()}, ?MODULE, [], []).
  
  %% @doc Query for the state of TorrentId, Id.
  %% <p>The function returns one of several possible values:</p>
  