server :: Config -> SomeKeyPair -> AppState -> IO ()
server config key state = scotty scottyPort $ do
  let notify = notifyForCSR config
  clientRoutes notify state
  adminRoutes state key
  where
    scottyPort = config ^. port

-- | Routes accessible by all clients under /
server :: Config -> SomeKeyPair -> AppState -> IO ()
server config key state = scotty scottyPort $ do
  let notify = notifyForCSR config
  clientRoutes notify state
  adminRoutes state key
  where
    scottyPort = config ^. port

-- | Routes accessible by all clients under /
server config key state = scotty scottyPort $ do
  let notify = notifyForCSR config
  clientRoutes notify state
  adminRoutes state key
  where
    scottyPort = config ^. port

-- | Routes accessible by all clients under /