anchor.diff:      mnesia:create_table(lease, [CopyMode
                                  ,{type, set}
                                  ,{attributes, record_info(fields, lease)}
  -                               ,{index, [s_pub]}]),
  +                               ,{index, [public]}]),
       ok = mnesia:wait_for_tables([lease], 10000),
       lager:info("Lease table initialized"),
       {ok, {}}.
  
positive.code:                 case mnesia:read(lease, Path) of
                      [] ->
                          {error, lease_not_found};
                      [#lease{s_path = Path, u_id = User, time = Time} | _]  ->
                          RemainingTime = MaxLeaseTime - (CurrentTime - Time),
                          case RemainingTime > 0 of
                              true ->
  
negative.code:     Result.
  
  priv_write_row(User, Path, Public, Secret) ->
      mnesia:write(#lease{path = Path,
                          u_id = User,
                          public = Public,
                          secret = Secret,
                          time = erlang:system_time(milli_seconds)}).
  