mkConfig :: Port -> String -> Config
mkConfig port uri = Config {
  port = port,
  krakenUri = fromJustNote "mkConfig: unparseable test URI" $ parseURI uri
 }
mkConfig :: Port -> String -> Config
mkConfig port uri = Config {
  port = port,
  krakenUri = fromJustNote "mkConfig: unparseable test URI" $ parseURI uri
 }
mkConfig port uri = Config {
  port = port,
  krakenUri = fromJustNote "mkConfig: unparseable test URI" $ parseURI uri
 }