anchor.diff:  
   % intercept l_on_cseq messages
   on(Msg, State) when element(1, Msg) =:= l_on_cseq ->
  -    Intercept = erlang:get(message_filter),
  +    Filter = erlang:get(message_filter),
  +    Intercept = Filter(Msg),
       if
           Intercept ->
               intercept_message(Msg, State);
  
positive.code:              List
      end.
  
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  % Message Loop
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  
negative.code:                      erlang:get(renewal_counter)}),
      State;
  
  on({set_message_filter, F, Owner, Pid}, State) ->
      erlang:put(message_filter, F),
      erlang:put(owner, Owner),
      comm:send_local(Pid, {set_message_filter_response}),
      State;
  
  on({reset_message_filter, Pid}, State) ->
      erlang:put(message_filter, fun(_Msg) -> false end),
      erlang:put(owner, undefined),
      comm:send_local(Pid, {reset_message_filter_response}),
      State;
  
  % get from dht_node_state
  on({get, Key, Pid}, State) ->
      comm:send_local(Pid,
  