diff --git a/dot2graphml.cabal b/dot2graphml.cabal
--- a/dot2graphml.cabal
+++ b/dot2graphml.cabal
@@ -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
diff --git a/dot2graphml.hs b/dot2graphml.hs
--- a/dot2graphml.hs
+++ b/dot2graphml.hs
@@ -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)]