diff --git a/bamboo-theme-blueprint.cabal b/bamboo-theme-blueprint.cabal
--- a/bamboo-theme-blueprint.cabal
+++ b/bamboo-theme-blueprint.cabal
@@ -1,5 +1,5 @@
 Name:                 bamboo-theme-blueprint
-Version:              2009.6.25
+Version:              2010.2.22
 Build-type:           Simple
 Synopsis:             bamboo blueprint theme
 Description:          bamboo blueprint theme
diff --git a/changelog.md b/changelog.md
--- a/changelog.md
+++ b/changelog.md
@@ -1,3 +1,9 @@
+2009.2.22
+
+### Fix, thanks to Григорий Холомьёв
+
+* show full article in read action
+
 2009.6.25
 ---------
 
diff --git a/src/Bamboo/Theme/Blueprint/Control/Post.hs b/src/Bamboo/Theme/Blueprint/Control/Post.hs
--- a/src/Bamboo/Theme/Blueprint/Control/Post.hs
+++ b/src/Bamboo/Theme/Blueprint/Control/Post.hs
@@ -18,7 +18,7 @@
 view s = (x.render +++ comment_view ).page s
   where
     x = s.posts.first
-    render = entry s
+    render = entry' s Full
     xs = s.comments
     comment_view = html_only_for Comment $ 
       CommentV.list xs 
diff --git a/src/Bamboo/Theme/Blueprint/Helper.hs b/src/Bamboo/Theme/Blueprint/Helper.hs
--- a/src/Bamboo/Theme/Blueprint/Helper.hs
+++ b/src/Bamboo/Theme/Blueprint/Helper.hs
@@ -4,16 +4,17 @@
 module Bamboo.Theme.Blueprint.Helper where
 
 import Bamboo.Env
-import Bamboo.Helper.ByteString
-import Data.ByteString
+import qualified Data.ByteString.Char8 as B
+import Data.ByteString.UTF8 (fromString)
+import Data.ByteString.Lazy (fromChunks)
 import Data.Default
 import Hack
 import Hack.Contrib.Constants
 import Hack.Contrib.Response
-import MPS.Heavy
 import Text.XHtml.Strict hiding (p, meta, body)
 import qualified Prelude as P
 import qualified Text.XHtml.Strict as Html
+import MPS.Heavy (unescape_xml)
 
 
 id :: String -> HtmlAttr
@@ -58,24 +59,26 @@
 xml_header :: String
 xml_header = "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"
 
-render_html :: Html -> ByteString
-render_html = renderHtml > unescape_unicode_xml > to_sb
+render_html :: Html -> B.ByteString
+render_html = renderHtml > unescape_xml > fromString
 
 output_html :: Html -> IO Response
 output_html = render_html > output_plain_html
 
-render_rss :: String -> ByteString
-render_rss = (xml_header ++) > unescape_unicode_xml > to_sb
+render_rss :: String -> B.ByteString
+render_rss = (xml_header ++) > fromString
 
-output_plain_html :: ByteString -> IO Response
+output_plain_html :: B.ByteString -> IO Response
 output_plain_html x = 
   def 
     .set_status 200
-    .set_body (x.to_lb)
+    .set_body utf8
     .set_content_type _TextHtmlUTF8
     .return
+  where
+    utf8 = [x].fromChunks
 
-output_plain_rss :: ByteString -> IO Response
+output_plain_rss :: B.ByteString -> IO Response
 output_plain_rss = output_plain_html
   > (^ set_content_type "application/rss+xml")
   
diff --git a/src/Bamboo/Theme/Blueprint/Widget/RSS.hs b/src/Bamboo/Theme/Blueprint/Widget/RSS.hs
--- a/src/Bamboo/Theme/Blueprint/Widget/RSS.hs
+++ b/src/Bamboo/Theme/Blueprint/Widget/RSS.hs
@@ -11,11 +11,6 @@
 import qualified Text.RSS as RSS
 import Network.URI
 
-
-
-instance Default URI where
-  def = nullURI
-
 data RSS = RSS
   {
     title         :: RSS.Title
@@ -40,7 +35,7 @@
   }
   .to_rss.rssToXML.showXML
   where
-    full_uri x  = def { uriScheme = "http://", uriPath = host_link x }
+    full_uri x  = nullURI { uriScheme = "http://", uriPath = host_link x }
     host_link x = s.config.host_name ++ (s.env.slashed_script_name / x)
     link        = full_uri (categary / title)
     items       = s.posts.map item_rss_template
