// default mode = "quick"
static Pair<Bool, S> transpileOnDediServer(S snippetID) {
  ret transpileOnDediServer(snippetID, "quick");
}

static Pair<Bool, S> transpileOnDediServer(long snippetID) {
  ret transpileOnDediServer(fsI(snippetID));
}

static Pair<Bool, S> transpileOnDediServer(long snippetID, S mode) {
  ret transpileOnDediServer(fsI(snippetID), mode);
}

// mode = "quick", "medium", "fresh"
// result = pair(ok, answer)
static Pair<Bool, S> transpileOnDediServer(S snippetID, S mode) ctex {
  S url = "https://transpile-coffee.botcompany.de/";
  print("Transpiling " + formatSnippetID(snippetID) + " on " + url);

  S result = postPage(url,
    paramsPlus(
      transpilationCredentials(),
      +snippetID,
      medium := eq(mode, "medium") ? "1" : null,
      fresh := eq(mode, "fresh") ? "1" : null));
  print(result);
  
  bool ok = cic(htmlDecode(result), "Transpiled & uploaded");
  ret pair(ok, result);
}

Began life as a copy of #1019465