diff --git a/Text/Blaze/Internal.hs b/Text/Blaze/Internal.hs
--- a/Text/Blaze/Internal.hs
+++ b/Text/Blaze/Internal.hs
@@ -148,7 +148,8 @@
     {-# INLINE return #-}
     (>>) = Append
     {-# INLINE (>>) #-}
-    h1 >>= f = h1 >> f (error "_|_")
+    h1 >>= f = h1 >> f
+        (error "Text.Blaze.Internal.HtmlM: invalid use of monadic bind")
     {-# INLINE (>>=) #-}
 
 instance IsString (HtmlM a) where
diff --git a/blaze-html.cabal b/blaze-html.cabal
--- a/blaze-html.cabal
+++ b/blaze-html.cabal
@@ -1,5 +1,5 @@
 Name:         blaze-html
-Version:      0.4.1.4
+Version:      0.4.1.5
 Homepage:     http://jaspervdj.be/blaze
 Bug-Reports:  http://github.com/jaspervdj/blaze-html/issues
 License:      BSD3