anchor.diff:      BucketContents = mini_s3:list_objects(Bucket, [], S3Conf),
       ?assertEqual(Bucket, proplists:get_value(name, BucketContents)),
       ?assertEqual([], proplists:get_value(contents, BucketContents)),
  -    Count = 4,
  +    Count = 6,
       Objs = [filename:join(random_binary(), random_binary()) ||
                  _ <- lists:seq(1,Count)],
       ec_plists:map(fun(F) ->
  
positive.code:     ok = bksw_app:manual_start(),
      Port = 4321,
      S3State = mini_s3:new(AccessKeyID, SecretAccessKey,
                            lists:flatten(io_lib:format("http://localhost.localdomain:~p",
                                                        [Port])),
                            path),
      [{s3_conf, S3State}, {disk_store, DiskStore} | Config].
  
negative.code:     SecretAccessKey = random_string(30, "abcdefghijklmnopqrstuvwxyz"),
      Port = 4321,
      S3State = mini_s3:new(AccessKeyID, SecretAccessKey,
                            lists:flatten(io_lib:format("http://127.0.0.1:~p",
                                                        [Port])),
                           path),
      lists:keyreplace(s3_conf, 1, Config1, {s3_conf, S3State});
  