diff --git a/handle-like.cabal b/handle-like.cabal
--- a/handle-like.cabal
+++ b/handle-like.cabal
@@ -2,7 +2,7 @@
 build-type:	Simple
 
 name:		handle-like
-version:	0.1.0.2
+version:	0.1.0.3
 stability:	Experimental
 author:		Yoshikuni Jujo <PAF01143@nifty.ne.jp>
 maintainer:	Yoshikuni Jujo <PAF01143@nifty.ne.jp>
diff --git a/src/Data/HandleLike.hs b/src/Data/HandleLike.hs
--- a/src/Data/HandleLike.hs
+++ b/src/Data/HandleLike.hs
@@ -14,7 +14,7 @@
 class (Monad (HandleMonad h),
 	IsString (DebugLevel h), Ord (DebugLevel h), Bounded (DebugLevel h)) =>
 	HandleLike h where
-	type HandleMonad h
+	type HandleMonad h :: * -> *
 	type DebugLevel h
 	hlPut :: h -> BS.ByteString -> HandleMonad h ()
 	hlGet :: h -> Int -> HandleMonad h BS.ByteString
