9 lines
178 B
Haskell
9 lines
178 B
Haskell
module Main (main) where
|
|
|
|
import Server
|
|
|
|
import Network.Wai.Handler.Warp
|
|
|
|
main :: IO ()
|
|
main = putStrLn "Try: http://localhost:8080/query?userID=1" >> run 8080 insecureOAuthMock
|