anchor.diff:  
   -include("couch_db.hrl").
   
  +-record(task_status, {
  +    type,
  +    name,
  +    start_ts,
  +    update_ts,
  +    status
  +}).
  +
   
   start_link() ->
       gen_server:start_link({local, ?MODULE}, ?MODULE, [], []).
  
positive.code: code_change(_OldVsn, State, _Extra) ->
      {ok, State}.
  
  
negative.code: 
  add_task(Type, TaskName, StatusText) ->
      put(task_status_update, {{0, 0, 0}, 0}),
      Ts = now_ts(),
      Msg = {
          add_task,
          #task_status{
              type = to_binary(Type),
              name = to_binary(TaskName),
              status = to_binary(StatusText),
              start_ts = Ts,
              update_ts = Ts
          }
      },
      gen_server:call(?MODULE, Msg).
  
  