anchor.diff:  -include_lib("caterpillar_event_internal.hrl").
   -define(
       SELECT(Type, ServiceOrIdent), 
  -    [{{'_', '$1', '$2', '$3'}, [{'andalso', {'==', '$1', Type}, {'==', '$2', ServiceOrIdent}}], ['$3']}]
  +    [{{'_', '$1', ServiceOrIdent, '$3'}, [{'==', '$1', Type}], ['$3']}]
   ).
   
   -export([start_link/1, stop/0, get_info/0]).
  
positive.code:     end.
  
  
  select_worker(Ets, Name) ->
      case catch ets:select(Ets, ?SELECT(worker, Name)) of
          [] -> {error, no_worker};
          [Pid|_] -> {ok, Pid};
          Error ->  
  
negative.code: 
  
  select_workers_pids(Ets, Ident) ->
      ets:select(Ets, ?SELECT(worker, Ident)).
  
  
  push_archives_to_new_worker(#state{ets=Ets}, WorkId, WorkerPid) ->
  