bd62f71 · typeable/mandrill

.travis.yml+2−3

compare with master

unifiedsplit

@@ -21,8 +21,6 @@ before_install:

21 - travis_retry sudo apt-get install cabal-install-$CABALVER ghc-$GHCVER

22 - export PATH=/opt/ghc/$GHCVER/bin:/opt/cabal/$CABALVER/bin:$PATH

23 - cabal --version

24− - cabal update

25− - cabal install hpc-coveralls

26

24

27install:

25install:

28 - cabal update

26 - cabal update

@@ -46,4 +44,5 @@ script:

46 fi

44 fi

47

45

48after_script:

46after_script:

49− - hpc-coveralls mandrill-tests

47+ - cabal install hpc-coveralls

48+ - hpc-coveralls --coverage-mode=StrictlyFullLines --exclude-dir=test mandrill-tests

mandrill.cabal+1

@@ -8,6 +8,7 @@ author: Alfredo Di Napoli

8maintainer: alfredo.dinapoli@gmail.com

9category: Network

10build-type: Simple

11+tested-with: GHC == 7.4, GHC == 7.6, GHC == 7.8

11cabal-version: >=1.10

12cabal-version: >=1.10

12

13

13source-repository head

14source-repository head

src/Network/API/Mandrill/Trans.hs+8

@@ -5,11 +5,19 @@ import Control.Monad.Reader

5import Control.Applicative

6import Network.API.Mandrill.Types

7

8+

9+--------------------------------------------------------------------------------

8newtype MandrillT m a = MandrillT {

10newtype MandrillT m a = MandrillT {

9 runMandrillT :: ReaderT MandrillKey m a

11 runMandrillT :: ReaderT MandrillKey m a

10 } deriving (MonadTrans, MonadReader MandrillKey,

12 } deriving (MonadTrans, MonadReader MandrillKey,

11 Functor, Applicative, Monad, MonadIO)

13 Functor, Applicative, Monad, MonadIO)

12

14

15+

16+--------------------------------------------------------------------------------

17+type Mandrill = MandrillT IO

18+

19+

20+--------------------------------------------------------------------------------

13runMandrill :: MonadIO m

21runMandrill :: MonadIO m

14 => MandrillKey

22 => MandrillKey

15 -> MandrillT m a

23 -> MandrillT m a