project-template 0.1.2 → 0.1.3
raw patch · 3 files changed
+17/−7 lines, 3 filesdep +classy-preludedep −classy-prelude-conduitdep ~conduit
Dependencies added: classy-prelude
Dependencies removed: classy-prelude-conduit
Dependency ranges changed: conduit
Files
Text/ProjectTemplate.hs view
@@ -3,6 +3,9 @@ {-# LANGUAGE MultiParamTypeClasses #-} {-# LANGUAGE NoImplicitPrelude #-} {-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE CPP #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE RankNTypes #-} module Text.ProjectTemplate ( -- * Create a template createTemplate@@ -16,7 +19,9 @@ , ProjectTemplateException (..) ) where -import ClassyPrelude.Conduit+import ClassyPrelude+import Data.Conduit+import Data.Conduit.List (sinkNull, consume) import Control.Monad.Writer (MonadWriter, tell) import qualified Data.ByteString.Base64 as B64 import Data.Typeable (Typeable)@@ -31,8 +36,11 @@ -- -- Since 0.1.0 createTemplate- :: Monad m- => GInfConduit (FilePath, m ByteString) m ByteString+#if MIN_VERSION_conduit(1, 0, 0)+ :: Monad m => Conduit (FilePath, m ByteString) m ByteString+#else+ :: Monad m => GInfConduit (FilePath, m ByteString) m ByteString+#endif createTemplate = awaitForever $ \(fp, getBS) -> do bs <- lift getBS case yield bs $$ CT.decode CT.utf8 =$ sinkNull of
project-template.cabal view
@@ -1,5 +1,5 @@ name: project-template-version: 0.1.2+version: 0.1.3 synopsis: Specify Haskell project templates and generate files description: See initial blog post for explanation: <http://www.yesodweb.com/blog/2012/09/project-templates> homepage: https://github.com/fpco/haskell-ide@@ -14,7 +14,7 @@ library exposed-modules: Text.ProjectTemplate build-depends: base >= 4 && < 5- , classy-prelude-conduit >= 0.4+ , classy-prelude >= 0.4 , base64-bytestring , base64-conduit , system-filepath >= 0.4@@ -34,11 +34,12 @@ type: exitcode-stdio-1.0 build-depends: base , project-template- , classy-prelude-conduit+ , classy-prelude , hspec >= 1.3 , transformers , QuickCheck , base64-bytestring+ , conduit ghc-options: -Wall source-repository head
test/Text/ProjectTemplateSpec.hs view
@@ -5,7 +5,8 @@ import Test.Hspec import Test.Hspec.QuickCheck import Text.ProjectTemplate-import ClassyPrelude.Conduit+import ClassyPrelude+import Data.Conduit import Control.Monad.Trans.Writer (execWriter) import Test.QuickCheck.Arbitrary import Data.Char (isAlphaNum)