diff --git a/src/Network/TigHTTP/Papillon.hs b/src/Network/TigHTTP/Papillon.hs
--- a/src/Network/TigHTTP/Papillon.hs
+++ b/src/Network/TigHTTP/Papillon.hs
@@ -12,7 +12,6 @@
 import Data.ByteString (ByteString)
 import Data.ByteString.Char8 (pack)
 import qualified Data.ByteString as BS
-import qualified Data.ByteString.Char8 as BSC
 
 import Network.TigHTTP.Token
 
@@ -109,8 +108,8 @@
 
 lws :: () = _:crlf _:(' ' / '\t')+
 
-text :: ByteString
-	= ts:(cs:<isTextChar>+ { cs } / _:lws { " " })+		{ pack $ concat ts }
+-- text :: ByteString
+--	= ts:(cs:<isTextChar>+ { cs } / _:lws { " " })+		{ pack $ concat ts }
 
 qdtext :: ByteString
 	= ts:(cs:<isQdtextChar>+ { cs } / _:lws { " " })+	{ pack $ concat ts }
@@ -125,10 +124,3 @@
 	/ qs:quotedString					{ qs }
 
 |]
-
-instance Source ByteString where
-	type Token ByteString = Char
-	data Pos ByteString = NoPos
-	getToken = BSC.uncons
-	initialPos = NoPos
-	updatePos _ _ = NoPos
diff --git a/tighttp.cabal b/tighttp.cabal
--- a/tighttp.cabal
+++ b/tighttp.cabal
@@ -2,7 +2,7 @@
 cabal-version:	>= 1.8
 
 name:		tighttp
-version:	0.0.0.0
+version:	0.0.0.1
 stability:	Experimental
 author:		Yoshikuni Jujo <PAF01143@nifty.ne.jp>
 maintainer:	Yoshikuni Jujo <PAF01143@nifty.ne.jp>
@@ -101,7 +101,7 @@
 source-repository	this
     type:	git
     location:	git://github.com/YoshikuniJujo/tighttp.git
-    tag:	tighttp-0.0.0.0
+    tag:	tighttp-0.0.0.1
 
 library
     hs-source-dirs:	src
@@ -114,6 +114,6 @@
     build-depends:
         base == 4.*, bytestring == 0.10.*, handle-like == 0.1.*,
         old-locale == 1.0.*, time == 1.4.*, monads-tf == 0.1.*,
-        papillon == 0.0.88, simple-pipe == 0.0.0.*
+        papillon == 0.1.*, simple-pipe == 0.0.0.*
     ghc-options:	-Wall
     extensions:		PatternGuards