anchor.diff:      io_lib:format("[~2..0w/~s/~4..0w:~2..0w:~2..0w:~2..0w ~s]",
                     [Date,month(Month),Year, Hour, Min, Sec, zone()]).
   
  +%% @private
  +file_write_test() ->
  +    {T1, T2, T3} = erlang:now(),
  +    random:seed(T1, T2, T3),
  +    FileName = "/tmp/event_" ++ integer_to_list(random:uniform(1000)) ++ ".log",
  +    {ok, Pid} = riak_event_logger:test_start(foo, FileName),
  +    Pid ! {event, test_event},
  +    %% Wait for delayed_write to flush
  +    timer:sleep(2100),
  +    exit(Pid, shutdown),
  +    {ok, Data} = file:read_file(FileName),
  +    %file:delete(FileName),
  +    ?assert(size(Data) > 0).
  
positive.code: %% @private
  code_change(_OldVsn, State, _Extra) -> {ok, State}.
  
  register_for_events(State) ->
      % Get the client...
      {ok, C} = riak:client_connect(State#state.node),
  
      % Attach the eventer...
      Desc = io_lib:format("~s", [?SERVER]),
      C:add_event_handler(self(), Desc, {'_', '_', '_', '_'}, []).
  
  
  %%% DATE FUNCTIONS %%%
  
negative.code:             file:write(FD, io_lib:format(": ~p~n",[Event]))
      end,
      {noreply, State};
  
  handle_info(_, State) -> {noreply, State}.
  
  %% @private
  