update to use data-default-0.8 instead of data-default-class

diagrams-lib.cabal

@@ -111,7 +111,7 @@ Library
                        diagrams-solve >= 0.1 && < 0.2,
                        active >= 0.2 && < 0.3,
                        colour >= 2.3.2 && < 2.4,
-                       data-default-class < 0.2,
+                       data-default >= 0.8 && < 0.9,
                        fingertree >= 0.1 && < 0.2,
                        intervals >= 0.7 && < 0.10,
                        lens >= 5.1 && < 5.4,

src/Diagrams/Attributes.hs

@@ -92,7 +92,7 @@ import           Control.Lens          hiding (none, over)
 import           Data.Colour
 import           Data.Colour.RGBSpace  (RGB (..))
 import           Data.Colour.SRGB      (toSRGB)
-import           Data.Default.Class
+import           Data.Default
 import           Data.Distributive
 import           Data.Monoid.Recommend
 import           Data.Semigroup

src/Diagrams/Combinators.hs

@@ -41,7 +41,7 @@ module Diagrams.Combinators
        ) where
 
 import           Control.Lens          hiding (beside, ( # ))
-import           Data.Default.Class
+import           Data.Default
 import           Data.Maybe            (fromJust)
 import           Data.Monoid.Deletable (toDeletable)
 import           Data.Monoid.MList     (inj)

src/Diagrams/Parametric/Adjust.hs

@@ -26,7 +26,7 @@ import           Control.Lens        (Lens', generateSignatures, lensRules, make
                                       (.~), (^.))
 import           Data.Proxy
 
-import           Data.Default.Class
+import           Data.Default
 
 import           Diagrams.Core.V
 import           Diagrams.Parametric

src/Diagrams/Prelude.hs

@@ -22,7 +22,7 @@ module Diagrams.Prelude
 
     -- | For working with default values. Diagrams also exports 'with',
     --   an alias for 'def'.
-  , module Data.Default.Class
+  , module Data.Default
 
     -- | For representing and operating on colors.
   , module Data.Colour
@@ -97,7 +97,7 @@ import           Data.Active
 import           Data.Colour         hiding (AffineSpace (..), atop, over)
 import           Data.Colour.Names   hiding (tan)
 import           Data.Colour.SRGB
-import           Data.Default.Class
+import           Data.Default
 import           Data.Semigroup
 
 import           Linear.Affine

src/Diagrams/TwoD/Adjust.hs

@@ -33,7 +33,7 @@ import           Diagrams.TwoD.Types
 import           Diagrams.Util            (( # ))
 
 import           Control.Lens             (Lens', set, (^.))
-import           Data.Default.Class
+import           Data.Default
 import           Data.Semigroup
 
 

src/Diagrams/TwoD/Arrow.hs

@@ -109,7 +109,7 @@ import           Control.Lens              (Lens', Traversal',
                                             generateSignatures, lensRules,
                                             makeLensesWith, view, (%~), (&),
                                             (.~), (^.))
-import           Data.Default.Class
+import           Data.Default
 import           Data.Maybe                (fromMaybe)
 import           Data.Monoid.Coproduct     (untangle)
 import           Data.Semigroup

src/Diagrams/TwoD/Arrowheads.hs

@@ -61,7 +61,7 @@ module Diagrams.TwoD.Arrowheads
        ) where
 
 import           Control.Lens            ((&), (.~), (<>~), (^.))
-import           Data.Default.Class
+import           Data.Default
 import           Data.Monoid             (mempty, (<>))
 
 import           Diagrams.Angle

src/Diagrams/TwoD/Attributes.hs

@@ -65,7 +65,7 @@ module Diagrams.TwoD.Attributes (
 import           Control.Lens                hiding (transform)
 import           Data.Colour                 hiding (AffineSpace, over)
 import           Data.Data
-import           Data.Default.Class
+import           Data.Default
 import           Data.Monoid.Recommend
 import           Data.Semigroup
 

src/Diagrams/TwoD/Combinators.hs

@@ -44,7 +44,7 @@ module Diagrams.TwoD.Combinators
 
 import           Control.Lens             ((&), (.~))
 import           Data.Colour
-import           Data.Default.Class
+import           Data.Default
 import           Data.Semigroup
 
 import           Diagrams.Core

src/Diagrams/TwoD/Model.hs

@@ -38,7 +38,7 @@ import           Control.Arrow            (second)
 import           Control.Lens             (makeLenses, (^.))
 import           Data.Colour              (Colour)
 import           Data.Colour.Names
-import           Data.Default.Class
+import           Data.Default
 import           Data.List                (intercalate)
 import qualified Data.Map                 as M
 import           Data.Maybe               (catMaybes)

src/Diagrams/TwoD/Offset.hs

@@ -53,7 +53,7 @@ import           Data.Maybe              (catMaybes)
 import           Data.Monoid
 import           Data.Monoid.Inf
 
-import           Data.Default.Class
+import           Data.Default
 
 import           Diagrams.Core
 
@@ -309,7 +309,7 @@ offsetPath = offsetPath' def
 -- "right" make sense.
 --
 -- > import Diagrams.TwoD.Offset
--- > import Data.Default.Class
+-- > import Data.Default
 -- >
 -- > corner :: (OrderedField n) => Located (Trail V2 n)
 -- > corner = fromVertices (map p2 [(0, 0), (10, 0), (5, 6)]) `at` origin
@@ -409,7 +409,7 @@ expandPath :: RealFloat n => n -> Path V2 n -> Path V2 n
 expandPath = expandPath' def
 
 -- > import Diagrams.TwoD.Offset
--- > import Data.Default.Class
+-- > import Data.Default
 -- >
 -- > expandTrailExample :: Diagram SVG
 -- > expandTrailExample = pad 1.1 . centerXY . hcat' (def & sep .~ 1)

src/Diagrams/TwoD/Path.hs

@@ -67,7 +67,7 @@ import qualified Data.Foldable             as F
 import           Data.Semigroup
 import           Data.Typeable
 
-import           Data.Default.Class
+import           Data.Default
 
 import           Diagrams.Angle
 import           Diagrams.Combinators      (withEnvelope, withTrace)

src/Diagrams/TwoD/Polygons.hs

@@ -52,7 +52,7 @@ import           Control.Monad        (forM, liftM)
 import           Control.Monad.ST     (ST, runST)
 import           Data.Array.ST        (STUArray, newArray, readArray,
                                        writeArray)
-import           Data.Default.Class
+import           Data.Default
 import           Data.List            (maximumBy, minimumBy)
 import           Data.Maybe           (catMaybes)
 import           Data.Ord             (comparing)

src/Diagrams/TwoD/Shapes.hs

@@ -50,7 +50,7 @@ module Diagrams.TwoD.Shapes
        ) where
 
 import           Control.Lens            (makeLenses, op, (&), (.~), (<>~), (^.))
-import           Data.Default.Class
+import           Data.Default
 import           Data.Semigroup
 
 import           Diagrams.Core

src/Diagrams/TwoD/Text.hs

@@ -57,7 +57,7 @@ import           Diagrams.TwoD.Attributes (recommendFillColor)
 import           Diagrams.TwoD.Types
 
 import           Data.Colour              hiding (over)
-import           Data.Default.Class
+import           Data.Default
 import           Data.Monoid.Recommend
 import           Data.Semigroup
 import           Data.Typeable

src/Diagrams/Util.hs

@@ -41,7 +41,7 @@ import           Control.Monad
 import           Control.Monad.Catch
 import           Control.Monad.Trans
 import           Control.Monad.Trans.Maybe
-import           Data.Default.Class
+import           Data.Default
 import           Data.List
 import           Data.Maybe
 import           Data.Monoid