handsy 0.0.12 → 0.0.13

raw patch · 3 files changed

+4/−8 lines, 3 filesdep −process

Dependencies removed: process

Files

handsy.cabal +1/−2
src/System/Handsy/Remote.hs +3/−3
src/System/Handsy/Util.hs +0/−3

handsy.cabal view

@@ -1,5 +1,5 @@ name:          handsy-version:       0.0.12+version:       0.0.13 synopsis:      A DSL to describe common shell operations and interpeters for running them locally and remotely. description:     @handsy@ is a small library mainly for applications which should make some@@ -35,7 +35,6 @@                     System.Handsy.Tutorial   build-depends:    base >=4.6 && <4.8                   , bytestring-                  , process                   , transformers                   , operational                   , process-extras

src/System/Handsy/Remote.hs view

@@ -11,6 +11,9 @@   -- * Helpers   , pushFile   , pullFile++  -- * Re-exports+  , def   ) where  import           Prelude                hiding (appendFile, readFile, writeFile)@@ -99,6 +102,3 @@          -> FilePath -- ^ Local path of destination          -> Handsy () pullFile remote local = readFile remote >>= liftIO . B.writeFile local--pushFileIfDifferent :: FilePath -> FilePath -> Handsy ()-pushFileIfDifferent local remote =

src/System/Handsy/Util.hs view

@@ -80,6 +80,3 @@     _             -> Nothing   where parseOsRelease = fmap (filter $ not . flip elem "'\"") -- Hack to unquote           <$> lookup "ID" . map ((\(x:xs) -> (x, concat xs)) . splitOn "=") . strLines--cksum :: FilePath -> Handsy (Maybe (Int, Int))-cksum fp = command_ "cksum" [fp] def >>= return . Just . (\[i, j] -> (i, j)) . map read . take 2 . words . head . strLines . stdout