sS fixAGILink(S s) {
  if (!isAbsoluteURL(s)) ret s;
  S host = hostNameFromURL(s);
  if (!isAGIBlueDomain(host)) ret s;
  S sub = dropSuffixIC(theAGIBlueDomain(), host);
  if (l(sub) <= maximumDomainPartLength()) ret s;
  ret "http://" + theAGIBlueDomain() + hquery(mapPlus(paramsFromURL(s), domain := host));
}