the-snip 0.0.0.1 → 0.1.0.0
raw patch · 2 files changed
+5/−11 lines, 2 filesdep −bytestringdep −textPVP ok
version bump matches the API change (PVP)
Dependencies removed: bytestring, text
API changes (from Hackage documentation)
Files
- src/Run.hs +4/−4
- the-snip.cabal +1/−7
src/Run.hs view
@@ -27,7 +27,7 @@ parseLine content = case result of Left err -> do- logInfo . display . T.pack $+ logDebug . display . T.pack $ "Defaulting back to content line: " <> err return $ mkContentLine content Right val -> do@@ -92,14 +92,14 @@ fileLines <- liftIO $ T.lines <$> readFileUtf8 (toFilePath inFile) fileContents <- pooledMapConcurrently parseLine fileLines fileEx <- (".snip" <>) <$> fileExtension inFile- logInfo . display . T.pack $ + logDebug . display . T.pack $ "File contents for " <> show inFile <> ": " <> show fileContents processContents fileEx outDir 0 fileContents processContents :: String -> Path Abs Dir -> Word -> [ParsedLine] -> RIO App () processContents _ _ _ [] = return () processContents fileExt outDir startCount (StartMarkerLine mayLbl:rest) = do- logInfo . display . T.pack $+ logDebug . display . T.pack $ "Saw the start of snippet for " <> show outDir <> ": " <> lbl outFile <- (outDir </>) <$> parseRelFile (lbl <> fileExt) concurrently_@@ -111,7 +111,7 @@ processSnip :: Path Abs File -> String -> [ParsedLine] -> RIO App () processSnip outFile _ [] =- logInfo . display . T.pack $+ logWarn . display . T.pack $ "No contents for snippet for " <> show outFile processSnip outFile lbl (EmptyLine:remainingLines) = processSnip outFile lbl remainingLines
the-snip.cabal view
@@ -5,7 +5,7 @@ -- see: https://github.com/sol/hpack name: the-snip-version: 0.0.0.1+version: 0.1.0.0 synopsis: Command line tool for extracting demarcated snippets from text files. description: Please see the README on Github at <https://github.com/robertfischer/the-snip#readme> category: Tool@@ -83,11 +83,9 @@ build-depends: attoparsec , base >=4.11 && <10- , bytestring , path , path-io , rio >=0.1.12.0- , text , unix default-language: Haskell2010 @@ -146,12 +144,10 @@ build-depends: attoparsec , base >=4.11 && <10- , bytestring , optparse-simple , path , path-io , rio >=0.1.12.0- , text , the-snip , unix default-language: Haskell2010@@ -213,12 +209,10 @@ build-depends: attoparsec , base >=4.11 && <10- , bytestring , hspec , path , path-io , rio >=0.1.12.0- , text , the-snip , unix default-language: Haskell2010