madlang 2.1.1.2 → 2.1.1.3
raw patch · 4 files changed
+4/−2 lines, 4 files
Files
- default.nix +1/−1
- madlang.cabal +1/−1
- src/Text/Madlibs.hs +1/−0
- src/Text/Madlibs/Ana/Resolve.hs +1/−0
default.nix view
@@ -4,7 +4,7 @@ }: mkDerivation { pname = "madlang";- version = "2.1.1.0";+ version = "2.1.1.2"; src = ./.; isLibrary = true; isExecutable = true;
madlang.cabal view
@@ -1,5 +1,5 @@ name: madlang-version: 2.1.1.2+version: 2.1.1.3 synopsis: Randomized templating language DSL description: Please see README.md homepage: https://github.com/vmchale/madlang#readme
src/Text/Madlibs.hs view
@@ -8,6 +8,7 @@ , makeTree -- * Functions and constructs for the `RandTok` data type , run+ , runText , RandTok (..) -- * Types associated with the parser , Context
src/Text/Madlibs/Ana/Resolve.hs view
@@ -34,6 +34,7 @@ runInFolder :: [T.Text] -> FilePath -> FilePath -> IO T.Text runInFolder = ((either (pure . parseErrorPretty') (>>= (pure . show'))) =<<) .** (fmap (fmap run) .** parseFile) +-- | Run based on text input, with nothing linked. runText :: [T.Text] -> String -> T.Text -> IO T.Text runText vars name txt = (either (pure . parseErrorPretty') id) . (fmap run) $ (parseTok name [] vars txt)