diff --git a/Graphics/X11/Xim.hsc b/Graphics/X11/Xim.hsc
--- a/Graphics/X11/Xim.hsc
+++ b/Graphics/X11/Xim.hsc
@@ -94,7 +94,7 @@
 	:: Ptr XIC -> XEventPtr -> Ptr CChar -> CInt -> Ptr #{ type KeySym }
 		-> Ptr #{ type Status } -> IO CInt
 utf8LookupString :: XIC -> XEventPtr -> IO ( Maybe String, Maybe KeySym )
-utf8LookupString xic pev = utf8LookupStringGen xic pev 1
+utf8LookupString xic pev = utf8LookupStringGen xic pev 8
 utf8LookupStringGen :: XIC -> XEventPtr -> Int -> IO ( Maybe String, Maybe KeySym )
 utf8LookupStringGen ( XIC pic ) pev bs = allocaBytes bs $ \buf ->
 	alloca $ \ks -> alloca $ \stat -> do
diff --git a/x11-xim.cabal b/x11-xim.cabal
--- a/x11-xim.cabal
+++ b/x11-xim.cabal
@@ -2,7 +2,7 @@
 cabal-version:	>= 1.2
 
 name:		x11-xim
-version:	0.0.4
+version:	0.0.5
 author:		Yoshikuni Jujo
 maintainer:	Yoshikuni Jujo <PAF01143@nifty.ne.jp>
 license:	BSD3