diff --git a/Text/Shakespeare/Text.hs b/Text/Shakespeare/Text.hs
--- a/Text/Shakespeare/Text.hs
+++ b/Text/Shakespeare/Text.hs
@@ -36,6 +36,7 @@
 
 class ToText a where
     toText :: a -> Builder
+instance ToText Builder where toText = id
 instance ToText [Char ] where toText = fromLazyText . TL.pack
 instance ToText TS.Text where toText = fromText
 instance ToText TL.Text where toText = fromLazyText
diff --git a/shakespeare-text.cabal b/shakespeare-text.cabal
--- a/shakespeare-text.cabal
+++ b/shakespeare-text.cabal
@@ -1,5 +1,5 @@
 name:            shakespeare-text
-version:         1.0.0.10
+version:         1.0.1
 license:         MIT
 license-file:    LICENSE
 author:          Greg Weber <greg@gregweber.info>