diff --git a/Blaze/ByteString/Builder/Html/Utf8.hs b/Blaze/ByteString/Builder/Html/Utf8.hs
--- a/Blaze/ByteString/Builder/Html/Utf8.hs
+++ b/Blaze/ByteString/Builder/Html/Utf8.hs
@@ -45,7 +45,7 @@
 writeHtmlEscapedChar '>'  = writeByteString "&gt;"
 writeHtmlEscapedChar '&'  = writeByteString "&amp;"
 writeHtmlEscapedChar '"'  = writeByteString "&quot;"
-writeHtmlEscapedChar '\'' = writeByteString "&apos;"
+writeHtmlEscapedChar '\'' = writeByteString "&#39;"
 writeHtmlEscapedChar c    = writeChar c
 {-# INLINE writeHtmlEscapedChar #-}
 
diff --git a/CHANGES b/CHANGES
--- a/CHANGES
+++ b/CHANGES
@@ -1,4 +1,12 @@
 
+* 0.2.0.2
+
+  Fixed bug: use &#39; instead of &apos; for HTML escaping '
+
+* 0.2.0.1
+  
+  Added a missing benchmark file.
+
 * blaze-builder-0.2.0.0
 
   Heavily restructured 'blaze-builder' such that 'Blaze.ByteString.Builder' serves as
diff --git a/blaze-builder.cabal b/blaze-builder.cabal
--- a/blaze-builder.cabal
+++ b/blaze-builder.cabal
@@ -1,5 +1,5 @@
 Name:                blaze-builder
-Version:             0.2.0.1
+Version:             0.2.0.2
 Synopsis:            Efficient construction of bytestrings.
 
 Description:         
diff --git a/tests/Tests.hs b/tests/Tests.hs
--- a/tests/Tests.hs
+++ b/tests/Tests.hs
@@ -73,7 +73,7 @@
 escaping2 = fromString "f &amp;&amp;&amp; g" @?= fromHtmlEscapedString "f &&& g"
 
 escaping3 :: Assertion
-escaping3 = fromString "&quot;&apos;" @?= fromHtmlEscapedString "\"'"
+escaping3 = fromString "&quot;&#39;" @?= fromHtmlEscapedString "\"'"
 
 instance Show Builder where
     show = show . toLazyByteString
