dot2graphml 0.1.0.1 → 0.1.0.2
raw patch · 2 files changed
+5/−4 lines, 2 filesdep ~graphviz
Dependency ranges changed: graphviz
Files
- dot2graphml.cabal +2/−2
- dot2graphml.hs +3/−2
dot2graphml.cabal view
@@ -1,5 +1,5 @@ name: dot2graphml-version: 0.1.0.1+version: 0.1.0.2 synopsis: Converter from GraphViz .dot format to yEd GraphML description: This package contains a converter from DOT format used by GraphViz (http://graphviz.org) to variant of GraphML@@ -21,7 +21,7 @@ build-depends: base > 4 && < 5, containers >= 0.4, hxt >= 9.2,- graphviz >= 2999.16.0.0,+ graphviz >= 2999.17.0.1, text >= 0.11.2.3 Source-repository head
dot2graphml.hs view
@@ -77,10 +77,11 @@ seqmap f xs = F.toList $ fmap f xs +showGID :: Maybe GraphID -> String showGID Nothing = "" showGID (Just (Str str)) = T.unpack str-showGID (Just (Int int)) = "i" ++ show int-showGID (Just (Dbl dbl)) = "d" ++ show dbl+showGID (Just (Num (Int int))) = "i" ++ show int+showGID (Just (Num (Dbl dbl))) = "d" ++ show dbl idAttr Nothing = [] idAttr x@(Just _) = [sattr "id" (showGID x)]