diff --git a/Setup.hs b/Setup.hs
--- a/Setup.hs
+++ b/Setup.hs
@@ -48,7 +48,7 @@
     system $ "wxdirect -c --wxc " ++ sourceDirectory ++ " -o " ++ wxcoreDirectory ++ " " ++ wxcoreIncludeFile
     system $ "wxdirect -d --wxc " ++ sourceDirectory ++ " -o " ++ wxcoreDirectory ++ " " ++ intercalate " " eiffelFiles
 
-    ver <- fmap (head . drop 1 . splitBy (== '.')) (readProcess "wx-config" ["--version"] "")
+    -- ver <- fmap (head . drop 1 . splitBy (== '.')) (readProcess "wx-config" ["--version"] "")
     let extra_wx_libs = if os == "mingw32"
                         then [ "-lwxmsw28ud_media", "-lwxmsw28ud_richtext", "-lwxmsw28ud_aui"
                              , "-lwxmsw28ud_xrc", "-lstdc++" ]
diff --git a/src/haskell/Graphics/UI/WXCore/WxcClassInfo.hs b/src/haskell/Graphics/UI/WXCore/WxcClassInfo.hs
--- a/src/haskell/Graphics/UI/WXCore/WxcClassInfo.hs
+++ b/src/haskell/Graphics/UI/WXCore/WxcClassInfo.hs
@@ -12,7 +12,7 @@
 Do not edit this file manually!
 This file was automatically generated by wxDirect on: 
 
-  * @2012-01-05 16:25:47.6171663 UTC@
+  * @2012-02-07 07:27:02.6451722 UTC@
 
 And contains 382 class info definitions.
 -}
diff --git a/src/haskell/Graphics/UI/WXCore/WxcClassTypes.hs b/src/haskell/Graphics/UI/WXCore/WxcClassTypes.hs
--- a/src/haskell/Graphics/UI/WXCore/WxcClassTypes.hs
+++ b/src/haskell/Graphics/UI/WXCore/WxcClassTypes.hs
@@ -12,7 +12,7 @@
 Do not edit this file manually!
 This file was automatically generated by wxDirect on: 
 
-  * @2012-01-05 16:25:47.4271644 UTC@
+  * @2012-02-07 07:27:02.4226688 UTC@
 
 From the files:
 
@@ -2170,7 +2170,7 @@
 import Graphics.UI.WXCore.WxcObject
 
 classTypesVersion :: String
-classTypesVersion  = "2012-01-05 16:25:47.4271644 UTC"
+classTypesVersion  = "2012-02-07 07:27:02.4226688 UTC"
 
 -- | Pointer to an object of type 'ConfigBase'.
 type ConfigBase a  = Object (CConfigBase a)
diff --git a/src/haskell/Graphics/UI/WXCore/WxcClasses.hs b/src/haskell/Graphics/UI/WXCore/WxcClasses.hs
--- a/src/haskell/Graphics/UI/WXCore/WxcClasses.hs
+++ b/src/haskell/Graphics/UI/WXCore/WxcClasses.hs
@@ -12,7 +12,7 @@
 Do not edit this file manually!
 This file was automatically generated by wxDirect on: 
 
-  * @2012-01-05 16:25:48.8571787 UTC@
+  * @2012-02-07 07:27:03.3726834 UTC@
 
 From the files:
 
diff --git a/src/haskell/Graphics/UI/WXCore/WxcClassesAL.hs b/src/haskell/Graphics/UI/WXCore/WxcClassesAL.hs
--- a/src/haskell/Graphics/UI/WXCore/WxcClassesAL.hs
+++ b/src/haskell/Graphics/UI/WXCore/WxcClassesAL.hs
@@ -13,7 +13,7 @@
 Do not edit this file manually!
 This file was automatically generated by wxDirect on: 
 
-  * @2012-01-05 16:25:48.2671728 UTC@
+  * @2012-02-07 07:27:03.0926791 UTC@
 
 From the files:
 
diff --git a/src/haskell/Graphics/UI/WXCore/WxcClassesMZ.hs b/src/haskell/Graphics/UI/WXCore/WxcClassesMZ.hs
--- a/src/haskell/Graphics/UI/WXCore/WxcClassesMZ.hs
+++ b/src/haskell/Graphics/UI/WXCore/WxcClassesMZ.hs
@@ -13,7 +13,7 @@
 Do not edit this file manually!
 This file was automatically generated by wxDirect on: 
 
-  * @2012-01-05 16:25:48.5771759 UTC@
+  * @2012-02-07 07:27:03.2701818 UTC@
 
 From the files:
 
diff --git a/src/haskell/Graphics/UI/WXCore/WxcDefs.hs b/src/haskell/Graphics/UI/WXCore/WxcDefs.hs
--- a/src/haskell/Graphics/UI/WXCore/WxcDefs.hs
+++ b/src/haskell/Graphics/UI/WXCore/WxcDefs.hs
@@ -12,7 +12,7 @@
 Do not edit this file manually!
 This file was automatically generated by wxDirect on: 
 
-  * @2012-01-05 16:25:48.9571797 UTC@
+  * @2012-02-07 07:27:03.4251842 UTC@
 
 From the files:
 
diff --git a/src/haskell/Graphics/UI/WXCore/WxcTypes.hs b/src/haskell/Graphics/UI/WXCore/WxcTypes.hs
--- a/src/haskell/Graphics/UI/WXCore/WxcTypes.hs
+++ b/src/haskell/Graphics/UI/WXCore/WxcTypes.hs
@@ -567,7 +567,7 @@
 rectFromSize (Size w h)
   = Rect 0 0 w h
 
-rectIsEmpty :: (Num a) => Rect2D a -> Bool
+rectIsEmpty :: (Num a, Eq a) => Rect2D a -> Bool
 rectIsEmpty (Rect l t w h)
   = (w==0 && h==0)
 
@@ -849,7 +849,7 @@
 toCChar = castCharToCChar
 
 -- generalised to work with Char and CChar
-withCharResult :: (Num a, Integral a) => IO a -> IO Char
+withCharResult :: (Num a, Integral a, Show a) => IO a -> IO Char
 withCharResult io
   = do x <- io
        if (x < 0)
diff --git a/wxcore.cabal b/wxcore.cabal
--- a/wxcore.cabal
+++ b/wxcore.cabal
@@ -1,5 +1,5 @@
 name:         wxcore
-version:      0.13.2
+version:      0.13.2.1
 license:      OtherLicense
 license-file: LICENSE
 author:       Daan Leijen
@@ -203,12 +203,11 @@
     stm,
     wxdirect > 0.12.1.2,
     directory,
-    old-time,
     time
 
   if flag(splitBase)
     build-depends:
-      array >= 0.2 && < 0.4,
+      array >= 0.2 && < 0.5,
       base >= 4 && < 5,
       containers >= 0.2 && < 0.5
   else