- Build something that allows Mateen's JIRA plugin to access protected resources w/out thinking about OAuth 2.0
- Build something that allows Mateen's JIRA plugin to access protected resources through an OAuth 2.0 adapter
- Stop thinking about Mateen's JIRA plugin
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
module Dispatch where | |
import Data.Dynamic | |
import Control.Monad.Reader.Class | |
-- THINGS WE WANT | |
-- 1. we want to avoid having to duplicate the type of the members of a | |
-- type class in our test (like Fixture) | |
-- 2. we want to be able to record the arguments applied to a test function | |
-- 3. we want to be able to control the return value from a test function |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
module Main where | |
import Control.Applicative (liftA2) | |
import Data.Char (isAlpha) | |
import Data.Either | |
import Data.List (find) | |
data GameError = InvalidInput String | |
| IncorrectGuess deriving (Show, Eq) |
Note: This is a paraphrased rip-off of the excellent article A Gentle Introduction to Monad Transformers. Almost none of these ideas are my own. I simply paired down the original post to something I thought was manageable for our study group.
- What they are
- Why you'd want them
- How they work
This section is never as exciting as the gripe-section; I'll keep it brief:
- System collaborators instantiated centrally
- Wrapping persisted values in
Stored
type - Great take on decoupling notion of request processing and response-creation from Scotty
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
module Style ( | |
foo, | |
Bar(..) | |
) where | |
data Bar = Bar { x :: String | |
, y :: Int } deriving (Show, Eq) | |
foo :: Bool -> Int | |
foo b = if b then 1 |