make gegl dependency

affection.cabal

@@ -47,6 +47,7 @@ library
                      , text
                      , linear
                      , mtl
+                     , gegl
                      -- , sdl2-image
 
 source-repository head

src/Affection.hs

@@ -9,7 +9,7 @@ module Affection
 
 import SDL
 import Data.Text
-import qualified Control.Concurrent as CC
+import GEGL
 
 import Affection.Render
 import Affection.Types
@@ -24,7 +24,9 @@ withWindow :: Monad m => Text -> WindowConfig -> RendererConfig -> RenderT m a -
 withWindow title wconf rconf ops = do
   window <- createWindow title wconf
   renderer <- createRenderer window (-1) rconf
+  gegl_init
   inRender renderer $ ops
+  gegl_exit
   destroyWindow window
 
 withDefaultWindow :: Monad m => Text -> (RenderT m a) -> IO ()

stack.yaml

@@ -6,6 +6,7 @@ resolver: lts-5.1
 # Local packages, usually specified by relative directory name
 packages:
 - '.'
+- "../gegl"
 
 # Packages to be pulled from upstream that are not in the resolver (e.g., acme-missiles-0.3)
 extra-deps: []