diff --git a/examples/43-http.hell b/examples/43-http.hell
index 5de93c5..8fa8a03 100644
--- a/examples/43-http.hell
+++ b/examples/43-http.hell
@@ -8,7 +8,8 @@ main = do
                Builder.byteString $ Text.encodeUtf8 "Hello, World!"
           Maybe.Nothing ->
              respond $ Http.responseBuilder (Http.mkStatus 500 "Error") [] $
-               Builder.byteString $ Text.encodeUtf8 "Wobble"
+               (Builder.byteString $ Text.encodeUtf8 "Wobble") <>
+               (Builder.byteString $ Text.encodeUtf8 "Wobble")
       else
         respond $
           Http.responseFile (Http.mkStatus 400 "Not Found")
diff --git a/src/Hell.hs b/src/Hell.hs
index 01b506e..ccde6f7 100644
--- a/src/Hell.hs
+++ b/src/Hell.hs
@@ -931,7 +931,7 @@ instances =
         instance2 @Semigroup @Either,
         instance2 @Semigroup @Options.Mod,
         instance0 @Semigroup @Text,
-        instance0 @Monoid @Builder,
+        instance0 @Semigroup @Builder,
         instance1 @Semigroup @Vector,
         instance1 @Semigroup @[],
         instance0 @FoldCase @Text,