anchor.diff:      if OldHeader == Header ->
           Db;
       Delay and (Db#db.waiting_delayed_commit == nil) ->
  -        Db2 = Db#db{waiting_delayed_commit=
  -                erlang:send_after(1000, self(), delayed_commit)},
  -        ok = gen_server:call(Db2#db.main_pid, {db_updated, Db2}),
  -        Db2;
  +        Db#db{waiting_delayed_commit=
  +                erlang:send_after(1000, self(), delayed_commit)};
       Delay ->
           Db;
       true ->
  
positive.code:         _    -> ok
          end,
  
          Db2 = Db#db{waiting_delayed_commit=nil,
              header=Header,
              committed_update_seq=Db#db.update_seq},
          ok = gen_server:call(Db2#db.main_pid, {db_updated, Db2}),
          Db2
      end.
  
  
  
negative.code:             {noreply, Db}
      end;
  handle_info(delayed_commit, Db) ->
      case commit_data(Db) of
          Db ->
              {noreply, Db};
          Db2 ->
              ok = gen_server:call(Db2#db.main_pid, {db_updated, Db2}),
              {noreply, Db2}
      end.
  
  code_change(_OldVsn, State, _Extra) ->
      {ok, State}.
  