diff --git a/Data/Graph/Libgraph/Dot.hs b/Data/Graph/Libgraph/Dot.hs
--- a/Data/Graph/Libgraph/Dot.hs
+++ b/Data/Graph/Libgraph/Dot.hs
@@ -20,7 +20,7 @@
         isRoot (v,_) = v == root g
 
         show1 v
-          -- | isRoot v  = vName r ++ "[shape=none label=\".\"]\n"
+          --  | isRoot v  = vName r ++ "[shape=none label=\".\"]\n"
           | otherwise = (showVertex vLabel v)
 
 showVertex :: (vertex->(String,String)) -> (vertex,Int) -> String
diff --git a/libgraph.cabal b/libgraph.cabal
--- a/libgraph.cabal
+++ b/libgraph.cabal
@@ -1,5 +1,5 @@
 Name:           libgraph
-Version:        1.12
+Version:        1.13
 Homepage:       http://maartenfaddegon.nl
 Synopsis:       Store and manipulate data in a graph.
 Description:    A graph type, analysis of graphs and manipulation of graphs.