diff --git a/System/Gnome/GConf/GConfClient.chs b/System/Gnome/GConf/GConfClient.chs
--- a/System/Gnome/GConf/GConfClient.chs
+++ b/System/Gnome/GConf/GConfClient.chs
@@ -178,7 +178,7 @@
 
 {#pointer GFreeFunc#}
 
-foreign import ccall "wrapper" mkDestructor :: IO () -> IO GFreeFunc
+foreign import ccall "wrapper" mkDestructor :: (Ptr () -> IO ()) -> IO GFreeFunc
 
 type GConfClientNotifyFunc = Ptr () ->         --GConfClient *client
                              {#type guint#} -> --guint cnxn_id
@@ -198,7 +198,7 @@
   hPtr <- mkHandler_GConfClientNotifyFunc
     (\_ _ entryPtr _ -> user (GConfEntry $ castPtr entryPtr))
   dRef <- newIORef nullFunPtr
-  dPtr <- mkDestructor $ do
+  dPtr <- mkDestructor $ \_ -> do
     freeHaskellFunPtr hPtr
     dPtr <- readIORef dRef
     freeHaskellFunPtr dPtr
diff --git a/System/Gnome/GConf/Types.chs b/System/Gnome/GConf/Types.chs
--- a/System/Gnome/GConf/Types.chs
+++ b/System/Gnome/GConf/Types.chs
@@ -1,4 +1,5 @@
 {-# OPTIONS_HADDOCK hide #-}
+{-# LANGUAGE CPP #-}
 -- -*-haskell-*-
 -- -------------------- automatically generated file - do not edit ----------
 --  Object hierarchy for the GIMP Toolkit (GTK) Binding for Haskell
@@ -41,8 +42,8 @@
   ) where
 
 import Foreign.ForeignPtr (ForeignPtr, castForeignPtr, unsafeForeignPtrToPtr)
-import Foreign.C.Types    (CULong, CUInt)
-import System.Glib.GType	(GType, typeInstanceIsA)
+import Foreign.C.Types    (CULong(..), CUInt(..))
+import System.Glib.GType  (GType, typeInstanceIsA)
 import System.Glib.GObject
 
 {# context lib="gtk" prefix="gtk" #}
diff --git a/gconf.cabal b/gconf.cabal
--- a/gconf.cabal
+++ b/gconf.cabal
@@ -1,5 +1,5 @@
 Name:           gconf
-Version:        0.12.1
+Version:        0.12.1.1
 License:        LGPL-2.1
 License-file:   COPYING
 Copyright:      (c) 2001-2010 The Gtk2Hs Team