packages feed

shh 0.3.1.1 → 0.3.1.2

raw patch · 2 files changed

+6/−5 lines, 2 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

- Shh.Internal: instance (a ~ ()) => GHC.Base.Monoid (Shh.Internal.Proc a)
- Shh.Internal: instance (a ~ ()) => Shh.Internal.Unit (m a)
- Shh.Internal: instance (io ~ GHC.Types.IO ()) => Shh.Internal.Cd io
- Shh.Internal: instance (io ~ GHC.Types.IO (), path ~ GHC.IO.FilePath) => Shh.Internal.Cd (path -> io)
- Shh.Internal: instance GHC.Exception.Exception Shh.Internal.Failure
+ Shh.Internal: instance (a Data.Type.Equality.~ ()) => GHC.Base.Monoid (Shh.Internal.Proc a)
+ Shh.Internal: instance (a Data.Type.Equality.~ ()) => Shh.Internal.Unit (m a)
+ Shh.Internal: instance (io Data.Type.Equality.~ GHC.Types.IO ()) => Shh.Internal.Cd io
+ Shh.Internal: instance (io Data.Type.Equality.~ GHC.Types.IO (), path Data.Type.Equality.~ GHC.IO.FilePath) => Shh.Internal.Cd (path -> io)
+ Shh.Internal: instance GHC.Exception.Type.Exception Shh.Internal.Failure
- Shh: withRead :: (PipeResult f, (NFData b)) => Proc a -> (String -> IO b) -> f b
+ Shh: withRead :: (PipeResult f, NFData b) => Proc a -> (String -> IO b) -> f b
- Shh.Internal: withRead :: (PipeResult f, (NFData b)) => Proc a -> (String -> IO b) -> f b
+ Shh.Internal: withRead :: (PipeResult f, NFData b) => Proc a -> (String -> IO b) -> f b

Files

shh.cabal view
@@ -1,5 +1,5 @@ name:                shh-version:             0.3.1.1+version:             0.3.1.2 synopsis:            Simple shell scripting from Haskell description:         Provides a shell scripting environment for Haskell. It                      helps you all external binaries, and allows you to
src/Shh/Internal.hs view
@@ -18,7 +18,7 @@ import Control.Exception as C import Control.Monad import Control.Monad.IO.Class-import Data.Char (isLower, isSpace, isAlphaNum, isUpper, toLower)+import Data.Char (isLower, isSpace, isAlphaNum, isUpper, toLower, isNumber) import Data.List (dropWhileEnd, intercalate) import Data.List.Split (endBy, splitOn) import qualified Data.Map as Map@@ -464,9 +464,10 @@     let         i = go (takeFileName ident)         go (c:cs)-            | isLower c = c : go' cs-            | isUpper c = toLower c : go' cs-            | otherwise = go' (c:cs)+            | isLower  c = c : go' cs+            | isUpper  c = toLower c : go' cs+            | isNumber c = '_' : go' (c : cs)+            | otherwise  = go' (c:cs)         go [] = "_"         go' (c:cs)             | isAlphaNum c = c : go' cs