Skip to content

Instantly share code, notes, and snippets.

@MarcelineVQ
Created March 3, 2020 04:45
Show Gist options
  • Save MarcelineVQ/ffa85dca9b972321087f90ff0e243701 to your computer and use it in GitHub Desktop.
Save MarcelineVQ/ffa85dca9b972321087f90ff0e243701 to your computer and use it in GitHub Desktop.
{-# LANGUAGE OverloadedStrings #-}
module Lib where
import Web.Scotty
import Control.Monad.Reader
data Config = Conf Int Bool
foo :: ReaderT Config ScottyM ()
foo = do
f <- ask
lift $ get "/" $ do somethingwithf
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment