[UTF-8 support for presentation and some in-bound feeds. prb@mult.ifario.us**20080318054047] { hunk ./servletsrc/perpubplat.hs 61 + ; setHeader "Content-type" "text/html; charset=utf-8" hunk ./src/Blog/FrontEnd/Presentation.hs 16 +import qualified Codec.Binary.UTF8.String as UTF8 hunk ./src/Blog/FrontEnd/Presentation.hs 33 - ; return . showHtml . concatHtml $ + ; return . UTF8.encodeString . showHtml . concatHtml $ hunk ./src/Blog/Widgets/StreamOfConsciousness/DeliciousPosts.hs 13 +import qualified Codec.Binary.UTF8.String as UTF8 hunk ./src/Blog/Widgets/StreamOfConsciousness/DeliciousPosts.hs 24 -handle_posts socc body = do { posts <- runX ( readString parse_opts body >>> getItems ) +handle_posts socc body = do { posts <- runX ( readString parse_opts ( UTF8.decodeString body ) >>> getItems ) hunk ./src/Blog/Widgets/StreamOfConsciousness/GoogleReader.hs 13 +import qualified Codec.Binary.UTF8.String as UTF8 + hunk ./src/Blog/Widgets/StreamOfConsciousness/GoogleReader.hs 28 -handle_posts socc body = do { posts <- runX ( readString parse_opts body >>> getEntries ) +handle_posts socc body = do { posts <- runX ( readString parse_opts ( UTF8.decodeString body ) >>> getEntries ) }