diff --git a/ghc-vis.cabal b/ghc-vis.cabal
--- a/ghc-vis.cabal
+++ b/ghc-vis.cabal
@@ -1,5 +1,5 @@
 name:               ghc-vis
-version:            0.7.2.1
+version:            0.7.2.2
 license:            BSD3
 license-file:       LICENSE
 category:           GHC, Debug, Development
@@ -40,12 +40,12 @@
   Exposed-modules: GHC.Vis
   Other-modules: GHC.Vis.Internal GHC.Vis.Types GHC.Vis.View.List GHC.Vis.View.Common Paths_ghc_vis
   Default-Language: Haskell2010
-  Build-depends: base >= 4.5 && < 4.7,
-                 mtl >= 2.0 && < 2.2,
-                 fgl == 5.4.*,
+  Build-depends: base >= 4.5 && < 4.8,
+                 mtl >= 2.0 && < 2.3,
+                 fgl >= 5.4 && < 5.6,
                  deepseq == 1.3.*,
-                 text >= 0.11 && < 1.1,
-                 transformers == 0.3.*,
+                 text >= 0.11 && < 1.2,
+                 transformers >= 0.3 && < 0.5,
                  containers >= 0.4 && < 0.6,
                  gtk == 0.12.*,
                  svgcairo == 0.12.*,
@@ -56,7 +56,7 @@
 
   if flag(graph)
       Other-modules: GHC.Vis.View.Graph.Parser GHC.Vis.View.Graph
-      Build-depends: graphviz == 2999.16.*,
+      Build-depends: graphviz == 2999.17.*,
                      xdot == 0.2.*
       Cpp-options: -DGRAPH_VIEW
 
diff --git a/src/GHC/Vis/View/Graph/Parser.hs b/src/GHC/Vis/View/Graph/Parser.hs
--- a/src/GHC/Vis/View/Graph/Parser.hs
+++ b/src/GHC/Vis/View/Graph/Parser.hs
@@ -123,7 +123,7 @@
   let hg = HeapGraph $ M.map (\hge -> hge{hgeClosure = fmap (removeOld $ M.keys hg') (hgeClosure hge)}) hg'
   --let hg = HeapGraph $ traverse removeOld hg'
 
-  xDot <- graphvizWithHandle graphvizCommand (defaultVis $ convertGraph hg) XDot hGetDot
+  xDot <- graphvizWithHandle graphvizCommand (defaultVis $ convertGraph hg) (XDot Nothing) hGetDot
 
   return (getOperations xDot, getBoxes (HeapGraph hg''), getDimensions xDot, getSize xDot)
 
