project-template 0.1.4 → 0.1.4.1
raw patch · 3 files changed
+34/−29 lines, 3 filesdep +conduit-extradep ~conduitdep ~resourcet
Dependencies added: conduit-extra
Dependency ranges changed: conduit, resourcet
Files
- Text/ProjectTemplate.hs +29/−27
- project-template.cabal +4/−2
- test/Text/ProjectTemplateSpec.hs +1/−0
Text/ProjectTemplate.hs view
@@ -17,33 +17,35 @@ , ProjectTemplateException (..) ) where -import Control.Exception (Exception, assert)-import Control.Monad (unless)-import Control.Monad.IO.Class (liftIO)-import Control.Monad.Trans.Class (lift)-import Control.Monad.Writer (MonadWriter, tell)-import Data.ByteString (ByteString)-import qualified Data.ByteString as S-import qualified Data.ByteString.Base64 as B64-import qualified Data.ByteString.Lazy as L-import Data.Conduit (Conduit, MonadResource, MonadThrow,- Sink, await, awaitForever, leftover,- monadThrow, yield, ($$), (=$),- (=$=))-import qualified Data.Conduit.Binary as CB-import Data.Conduit.List (consume, sinkNull)-import qualified Data.Conduit.List as CL-import qualified Data.Conduit.Text as CT-import Data.Map (Map)-import qualified Data.Map as Map-import Data.Text (Text)-import qualified Data.Text as T-import Data.Text.Encoding (encodeUtf8)-import Data.Typeable (Typeable)-import Filesystem (createTree)-import Filesystem.Path.CurrentOS (FilePath, directory, encodeString,- fromText, toText, (</>))-import Prelude hiding (FilePath)+import Control.Exception (Exception, assert)+import Control.Monad (unless)+import Control.Monad.IO.Class (liftIO)+import Control.Monad.Trans.Class (lift)+import Control.Monad.Trans.Resource (MonadResource, MonadThrow,+ monadThrow)+import Control.Monad.Writer (MonadWriter, tell)+import Data.ByteString (ByteString)+import qualified Data.ByteString as S+import qualified Data.ByteString.Base64 as B64+import qualified Data.ByteString.Lazy as L+import Data.Conduit (Conduit, Sink, await,+ awaitForever, leftover, yield,+ ($$), (=$), (=$=))+import qualified Data.Conduit.Binary as CB+import Data.Conduit.List (consume, sinkNull)+import qualified Data.Conduit.List as CL+import qualified Data.Conduit.Text as CT+import Data.Map (Map)+import qualified Data.Map as Map+import Data.Text (Text)+import qualified Data.Text as T+import Data.Text.Encoding (encodeUtf8)+import Data.Typeable (Typeable)+import Filesystem (createTree)+import Filesystem.Path.CurrentOS (FilePath, directory,+ encodeString, fromText, toText,+ (</>))+import Prelude hiding (FilePath) -- | Create a template file from a stream of file/contents combinations. --
project-template.cabal view
@@ -1,5 +1,5 @@ name: project-template-version: 0.1.4+version: 0.1.4.1 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@@ -21,7 +21,8 @@ , bytestring >= 0.9 , transformers >= 0.2 , mtl >= 2.0- , conduit >= 1.0 && < 1.1+ , conduit >= 1.0 && < 1.2+ , conduit-extra , resourcet >= 0.4.3 , containers ghc-options: -Wall@@ -42,6 +43,7 @@ , bytestring , containers , system-filepath+ , resourcet ghc-options: -Wall source-repository head
test/Text/ProjectTemplateSpec.hs view
@@ -6,6 +6,7 @@ import Text.ProjectTemplate import Data.Conduit import Control.Monad.Trans.Writer (execWriter)+import Control.Monad.Trans.Resource (runExceptionT_) import Test.QuickCheck.Arbitrary import Data.Char (isAlphaNum) import qualified Data.ByteString.Base64 as B64