diff --git a/Changelog b/Changelog
--- a/Changelog
+++ b/Changelog
@@ -7,6 +7,17 @@
 The following is information about what major changes have gone into
 each release.
 
+Changes in 2999.12.0.2
+----------------------
+
+* Forgot to explicitly list the module for Arbitrary instance for the
+  graph representation.
+
+Changes in 2999.12.0.1
+----------------------
+
+* Fix a bug that prevented graphviz from being built with GHC 7.2.
+
 Changes in 2999.12.0.0
 ----------------------
 
diff --git a/Data/GraphViz/Testing/Instances/Graph.hs b/Data/GraphViz/Testing/Instances/Graph.hs
new file mode 100644
--- /dev/null
+++ b/Data/GraphViz/Testing/Instances/Graph.hs
@@ -0,0 +1,31 @@
+{-# OPTIONS_GHC -fno-warn-orphans #-}
+{-# OPTIONS_HADDOCK hide #-}
+{-# LANGUAGE FlexibleInstances #-}
+
+{- |
+   Module      : Data.GraphViz.Testing.Instances.Graph
+   Description : Graph dot graph instances for Arbitrary.
+   Copyright   : (c) Ivan Lazar Miljenovic
+   License     : 3-Clause BSD-style
+   Maintainer  : Ivan.Miljenovic@gmail.com
+ -}
+module Data.GraphViz.Testing.Instances.Graph where
+
+import Data.GraphViz.Testing.Instances.Canonical()
+
+import Data.GraphViz.Types.Graph
+import Data.GraphViz.Types(fromCanonical)
+
+import Test.QuickCheck
+
+import Control.Monad(liftM)
+
+-- -----------------------------------------------------------------------------
+
+-- | Can't directly create one of these as it might not match the
+--   internal format directly; as such, have to use the inefficient
+--   'fromCanonical' route.
+instance (Arbitrary n, Ord n) => Arbitrary (DotGraph n) where
+  arbitrary = liftM fromCanonical arbitrary
+
+  shrink = map fromCanonical . shrink . toCanonical
diff --git a/graphviz.cabal b/graphviz.cabal
--- a/graphviz.cabal
+++ b/graphviz.cabal
@@ -1,5 +1,5 @@
 Name:               graphviz
-Version:            2999.12.0.1
+Version:            2999.12.0.2
 Stability:          Beta
 Synopsis:           Bindings to Graphviz for graph visualisation.
 Description: {
@@ -108,6 +108,7 @@
                                 Data.GraphViz.Testing.Instances.Common
                                 Data.GraphViz.Testing.Instances.Canonical
                                 Data.GraphViz.Testing.Instances.Generalised
+                                Data.GraphViz.Testing.Instances.Graph
 
         if True
            Ghc-Options: -Wall