anchor.diff:  stop() -> 
     try ?MODULE ! stop
     catch _:_ -> ok
  +  end.
  +
  +%% E.g:  add_send_subscriber("localhost",56669,"I'm a Cookie").
  +add_send_subscriber(Host,Port,PassPhrase) ->
  +  try {ok,{hostent,Host,[],inet,4,_}} = inet:gethostbyname(Host),
  +      ?MODULE ! {add_subscriber,mk_send(Host,Port,PassPhrase)},
  +      ok
  +  catch 
  +    error:{badmatch,{ok,{hostent,G,[W],inet,4,_}}} -> {error,{badhost,W,G}};
  +    _:R -> {error,R}
  +  end.
  +
  +add_log_subscriber() ->
  +  try ?MODULE ! {add_subscriber,mk_log(group_leader())}, ok
  +  catch _:R -> {error,R}
  +  end.
  +
  +clear_subscribers() ->
  +  try ?MODULE ! clear_subscribers, ok
  +  catch _:R -> {error,R}
     end.
   
   message(Term) ->
  
positive.code:   end.
  
  start_monitor(Triggers) ->
    erlang:system_monitor(self(), sysmons(Triggers)),Triggers.
  
  sysmons(Triggers) ->
    [{Tag,Val} || {[sysMon,Tag],Val} <- Triggers] ++ [busy_port,busy_dist_port].
  
negative.code: 
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  mk_log(FD) -> fun(E)-> print_term(FD,expand_recs(E)) end.
  
  print_term(FD,Term) -> 
    case node(FD) == node() of
      true -> ?log(Term);
  