anchor.diff:        fun() -> filename:join(get_data_dir(InstanceName), "archive") end).
   
   get_log_file(InstanceName) ->
  -    filename:join(get_data_dir(InstanceName), InstanceName)++".log".
  +    filename:join(get_data_dir(InstanceName), InstanceName).
   
   get_reopen_period(InstanceName) ->
       logmachine_app:get_instance_env(
  
positive.code:                 zlists_disk_log:read(Filename)
          end)).
  
  get_logs_owner(InstanceName) ->
      case whereis(get_archiver_srv_name(InstanceName)) of
          undefined -> self();
  
negative.code: 
  % Record event
  handle_cast(Event, #state_recorder{buff_size=BuffMaxSize,
                                     buff_max_size=BuffMaxSize}=State) ->
      handle_cast(Event,flush(State));
  handle_cast({Timestamp,_Data}=Event, 
              #state_recorder{buff=Buff,buff_size=BuffSize}=State) ->
      {noreply, 
       State#state_recorder{last_timestamp=Timestamp, 
                            buff=[Event|Buff],
                            buff_size=BuffSize+1}, 1000};
  % Skip message
  handle_cast(_Msg, State) ->
      {noreply, State}.
  
  flush(#state_recorder{buff=[]}=State) ->
      State;
  flush(#state_recorder{instance_name=Name,
                        buff=Buff}=State) ->
      ok=disk_log:alog_terms(Name, lists:reverse(Buff)),
      State#state_recorder{buff=[], buff_size=0}.
  
  % Recorder clauses
  handle_info(timeout, #state_recorder{}=State) ->
  