ReasonML snippets

apollo_cache_control.re

/**

Very nasty way to control Apollo cache in reason-apollo

*/

[@bs.module] external gql: ReasonApolloTypes.gql = "graphql-tag";

let shifts_query =
  gql(.
    "fragment shiftDraftStatus on shifts_listedshift {
    uuid
    draft
  }",
  );

let shifts_query_update_cache = [%raw
  {|
  function update(cache, data) {
    const {uuid, draft} = data.data.update_shifts_listedshift.returning[0]
    const fragmentId = `shifts_listedshift:${uuid}`
    const shift = cache.readFragment({
      id: fragmentId,
      fragment: shifts_query,
    })
    cache.writeFragment({
      id: fragmentId,
      fragment: shifts_query,
      data: { draft, __typename: "shifts_listedshift" }
    });
  }
|}
];