module Main (main) where import Server import Network.Wai.Handler.Warp main :: IO () main = putStrLn "Try: http://localhost:8080/auth?scopes=[ID,Profile]" >> run 8080 insecureOAuthMock