main :: IO ()
main = do
  cfg <- getConfig
  run (cfgServerPort cfg) $ switch cfg
main :: IO ()
main = do
  cfg <- getConfig
  run (cfgServerPort cfg) $ switch cfg
main = do
  cfg <- getConfig
  run (cfgServerPort cfg) $ switch cfg