shell-monad 0.3.0 → 0.3.1
raw patch · 4 files changed
+11/−5 lines, 4 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- CHANGELOG +6/−0
- Control/Monad/Shell.hs +3/−3
- examples/protocol.hs +1/−1
- shell-monad.cabal +1/−1
CHANGELOG view
@@ -1,3 +1,9 @@+shell-monad (0.3.1) unstable; urgency=medium++ * Fixed linear rendering of caseOf++ -- Joey Hess <id@joeyh.name> Fri, 26 Dec 2014 23:49:38 -0400+ shell-monad (0.3.0) unstable; urgency=medium * Renamed a few operators.
Control/Monad/Shell.hs view
@@ -681,14 +681,14 @@ -- > case "$foo" in ook) : -- > echo got ook -- > echo yay- -- > ;; *) :+ -- > : ;; *) : -- > echo default- -- > ;; esac+ -- > : ;; esac go _ [] = add $ Cmd $ ";; esac" go atstart ((t, s):rest) = do let leader = if atstart then "case " <> toTextParam v undefined <> " in "- else ";; "+ else ": ;; " add $ Cmd $ leader <> getQ t <> ") :" mapM_ (add . indent) =<< runM s go False rest
examples/protocol.hs view
@@ -86,7 +86,7 @@ handleBar = toStderr $ cmd "echo" "yay, I got a Bar" handleBaz :: Var -> Script ()-handleBaz num = forCmd (cmd "seq" "1" num) $+handleBaz num = forCmd (cmd "seq" (Val (1 :: Int)) num) $ toStderr . cmd "echo" "yay, I got a Baz" getProtoCommand :: Var -> Script Var
shell-monad.cabal view
@@ -1,5 +1,5 @@ Name: shell-monad-Version: 0.3.0+Version: 0.3.1 Cabal-Version: >= 1.8 License: BSD3 Maintainer: Joey Hess <id@joeyh.name>