anchor.diff:  %%--------------------------------------------------------------------
   
   %%--------------------------------------------------------------------
  -%% Function: handle_event({event, Prio, Class, Desc, Ctx, Data},
  +%% Function: handle_event({event, Pid, Prio, Class, Id, L},
   %%                        State)
  +%%           Pid   = pid(), process generating the event
   %%           Prio  = atom(), debug | normal | error
   %%           Class = atom(), class of message (call | proxy | ...)
  -%%           Desc  = atom() | tuple(), message type
  -%%           Ctx   = term(), context
  -%%           Data  = term(), the data to be logged
  +%%           Id    = string()
  +%%           L     = list() of term(), the data to be logged
   %% Descrip.: Log event using our syslog port driver.
   %% Returns : {ok, State}
   %%--------------------------------------------------------------------
  
positive.code: 		   debug -> $d;
  		   normal -> $i;
  		   error -> $e;
  		   _ -> $.
  	       end,
      Msg = io_lib:format("~c" "c=~p; id=~p; ~800p", [PrioChar, Class, Id, L]),
      Port = State#state.port,
      true = port_command(Port, Msg),
      {ok, State};
  
  handle_event(_Event, State) ->
      {ok, State}.
  
  
  
negative.code: %%           {swap_handler, Reply, Args1, State1, Mod2, Args2} |
  %%           {remove_handler, Reply}
  %%--------------------------------------------------------------------
  handle_call(Request, State) ->
      logger:log(error, "Event handler csyslog: Received unknown call : ~p", [Request]),
      Reply = ok,
      {ok, Reply, State}.
  
  