anchor.diff:      {list_to_integer(proplists:get_value("db_data_size", Props)),
        list_to_integer(proplists:get_value("db_file_size", Props))}.
   
  -maybe_compact_vbucket(BucketName, {VBucket, DbName} = VBucketAndDb,
  +maybe_compact_vbucket(BucketName, {VBucket, DbName},
                         Config, Force, Options) ->
       Bucket = binary_to_list(BucketName),
   
       SizeInfo = case VBucket of
                      master ->
  -                       get_master_db_size_info(BucketName, VBucketAndDb);
  +                       get_master_db_size_info(DbName);
                      _ ->
                          get_db_size_info(Bucket, VBucket)
                  end,
  
positive.code:     ?log_info("Compacting `~s' (~p)", [DbName, Options]),
      Ret = case VBucket of
                master ->
                    compact_master_vbucket(BucketName, DbName);
                _ ->
                    ns_memcached:compact_vbucket(Bucket, VBucket, Options)
            end,
  
negative.code:               end
        end).
  
  compact_master_vbucket(DbName) ->
      Db = open_db_or_fail(DbName),
      process_flag(trap_exit, true),
  
      {ok, Compactor} = couch_db:start_compact(Db, [dropdeletes]),
  