gvti 0.2.0.0 → 0.2.0.1

raw patch · 4 files changed

+10/−5 lines, 4 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• ChangeLog.md +5/−0
• GVTI.hs +2/−2
• Main.hs +2/−2
• gvti.cabal +1/−1

@@ -15,3 +15,8 @@ ## 0.2.0.0 -- 2022-11-14  * Second version. Added the possibility to specify your own list  of Char-delimiters (using -d option).++## 0.2.0.1 -- 2022-11-15++* Second version revised A. Fixed issue with the colon as the formatting delimiter. Some minor error handling improvements.+

@@ -171,7 +171,7 @@           let ys = processCellsG delims splines1 text in writeFile ("at." ++ show ts ++ "." ++ bnames1 ++ ".gv") ys           putStrLn "The visualization will be created with the at-sign preserved."           processFile 'a' ts bnames1 xxs yys-  | otherwise = error "Empty text to be processed! "+  | otherwise = error "GVTI.process2: Empty text to be processed! "  procCtrl :: Int -> IO String procCtrl 1 = putStrLn "Please, input the basic name of the visualization file!" >> getLine@@ -189,7 +189,7 @@ processFile w t zs xxs yys = do   if all (isJust . showE) ["fdp","twopi","circo","neato","sfdp","dot","patchwork","osage"]     then processFile1 w t zs xxs yys-    else error "MMSyn4.processFile: Please, install the GraphViz so that its executables are in the directories mentioned in the variable PATH!"+    else error "GVTI.processFile: Please, install the GraphViz so that its executables are in the directories mentioned in the variable PATH!" {-# INLINE processFile #-}  processFile1 :: Char -> Integer -> String -> String -> String -> IO ()

@@ -39,7 +39,7 @@     then do        text2 <- readFile arg0 -- well, in the future  this can be extended to also stdin.       let txt -           | gvti = unlines  . formatLines ':' . filter (any (\x -> isLetter x || isDigit x)) . lines $ text2+           | gvti = unlines  . formatLines (head delims) . filter (any (\x -> isLetter x || isDigit x)) . lines $ text2            | otherwise =  unlines . filter (any (\x -> isLetter x || isDigit x)) . lines $ text2       process2 delims xxs yys bnames splines remAts txt-    else putStrLn "No file specified exists in the current directory! "  +    else error "Main: No file specified exists in the current directory! "  

@@ -2,7 +2,7 @@ -- documentation, see http://haskell.org/cabal/users-guide/  name:                gvti-version:             0.2.0.0+version:             0.2.0.1 synopsis:            GraphViz Tabular Interface description:         Introduces a new file extension .gvti and is a special tabular or line-based GraphViz subset interface. Is a fork of the now deprecated mmsyn4 package. homepage:            https://hackage.haskell.org/package/gvti