1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
|
--- a/src/Facebook/Base.hs
+++ b/src/Facebook/Base.hs
@@ -15,7 +15,7 @@
import Control.Monad (mzero)
import Control.Monad.IO.Class (MonadIO)
import Data.ByteString.Char8 (ByteString)
-import Data.Default (def)
+import Data.Default.Class (def)
import Data.Text (Text)
import Data.Typeable (Typeable)
--- a/fb.cabal
+++ b/fb.cabal
@@ -72,7 +72,8 @@
, monad-control
, resourcet
, conduit == 1.0.*
- , data-default
+ , data-default-class
+ , data-default-instances-base
, http-types
, http-conduit == 2.0.*
, attoparsec >= 0.10.4 && < 0.12
--- a/src/Facebook/TestUsers.hs
+++ b/src/Facebook/TestUsers.hs
@@ -14,7 +14,8 @@
import Control.Applicative ((<$>), (<*>))
import Control.Monad (unless, mzero)
import Control.Monad.Trans.Control (MonadBaseControl)
-import Data.Default
+import Data.Default.Class
+import Data.Default.Instances.Base ()
import Data.Text
import Data.Time (UTCTime(..), Day(..))
import Data.Typeable (Typeable)
|