let create_from_cf_wrappers ?(desc="") wrappers =
  let group = new CF.group in
  let tuple2 = CF.tuple2_wrappers CF.string_wrappers wrappers in
  let cp = new CF.list_cp tuple2 ~group ["bookmarks"] [] desc in
  {
    bk_table = Hashtbl.create 101;
    bk_cf_group = group ;
    bk_cf_cp = cp ;
  }