git.iko.soy/typeable/mandrill
on master help sign in
Merge pull request #2 from adinapoli/messages-calls

Small fixes

commit53ec4860bc36af0c47b34f1bf27d23f7c937dd04 authorAlfredo Di Napoli <alfredo.dinapoli@gmail.com> dateSat 6 Sep 2014, 21:25 (12 years ago) parentdbd48ca27cab03
4 files changed+15−6
compare with master
unifiedsplit
.travis.yml+5−5 README.md+1−1 mandrill.cabal+1 src/Network/API/Mandrill/Trans.hs+8
.travis.yml+5−5
@@ -21,17 +21,15 @@ before_install:
2121 - travis_retry sudo apt-get install cabal-install-$CABALVER ghc-$GHCVER
2222 - export PATH=/opt/ghc/$GHCVER/bin:/opt/cabal/$CABALVER/bin:$PATH
2323 - cabal --version
24− - cabal update
25− - cabal install hpc-coveralls
2624
2725install:
2826 - cabal update
2927 - cabal install --only-dependencies --enable-tests
3028
3129script:
32− - cabal configure --enable-tests -v2
30+ - cabal configure --enable-tests -v2 --enable-library-coverage
3331 - cabal build
34− - cabal test
32+ - cabal test --show-details=always
3533 - cabal check
3634 - cabal sdist
3735
@@ -46,4 +44,6 @@ script:
4644 fi
4745
4846after_script:
49− - hpc-coveralls mandrill-tests
47+ - cabal install hpc-coveralls
48+ - export PATH=/opt/ghc/$GHCVER/bin:$HOME/.cabal/bin:$PATH
49+ - hpc-coveralls --coverage-mode=StrictlyFullLines mandrill-tests
README.md+1−1
@@ -1,5 +1,5 @@
11[![Build Status](https://travis-ci.org/adinapoli/mandrill.svg?branch=master)](https://travis-ci.org/adinapoli/mandrill)
2−[![Coverage Status](https://img.shields.io/coveralls/adinapoli/mandrill.svg)](https://coveralls.io/r/adinapoli/mandrill)A
2+[![Coverage Status](https://img.shields.io/coveralls/adinapoli/mandrill.svg)](https://coveralls.io/r/adinapoli/mandrill)
33
44# Haskell Client for the Mandrill JSON API
55
mandrill.cabal+1
@@ -8,6 +8,7 @@ author: Alfredo Di Napoli
88maintainer: alfredo.dinapoli@gmail.com
99category: Network
1010build-type: Simple
11+tested-with: GHC == 7.4, GHC == 7.6, GHC == 7.8
1112cabal-version: >=1.10
1213
1314source-repository head
src/Network/API/Mandrill/Trans.hs+8
@@ -5,11 +5,19 @@ import Control.Monad.Reader
55import Control.Applicative
66import Network.API.Mandrill.Types
77
8+
9+--------------------------------------------------------------------------------
810newtype MandrillT m a = MandrillT {
911 runMandrillT :: ReaderT MandrillKey m a
1012 } deriving (MonadTrans, MonadReader MandrillKey,
1113 Functor, Applicative, Monad, MonadIO)
1214
15+
16+--------------------------------------------------------------------------------
17+type Mandrill = MandrillT IO
18+
19+
20+--------------------------------------------------------------------------------
1321runMandrill :: MonadIO m
1422 => MandrillKey
1523 -> MandrillT m a