diff --git a/bamboo.cabal b/bamboo.cabal
--- a/bamboo.cabal
+++ b/bamboo.cabal
@@ -1,5 +1,5 @@
 Name:                 bamboo
-Version:              2009.8.16
+Version:              2009.11.1
 Build-type:           Simple
 Synopsis:             A simple blog engine on Hack
 License:              GPL
@@ -15,13 +15,32 @@
 library
   ghc-options: -Wall -fno-warn-orphans 
   build-depends: 
-      base >= 4 && < 5, network, mtl, haskell98, old-locale, old-time
-    , time, unix, bytestring, base64-string, zlib, directory, filepath
-    , containers, process, parsedate >= 3000.0.0
-    , xhtml, utf8-string >= 0.3.3, pandoc, parsec >= 2, gravatar >= 0.3
-    , data-default >= 0.2
-    , mps >= 2009.6.25, hcheat >= 2009.6.25
-    , hack >= 2009.5.19, hack-contrib >= 2009.6.25
+                    base >= 4 && < 5
+                  , network
+                  , mtl
+                  , haskell98
+                  , old-locale
+                  , old-time
+                  , time
+                  , unix
+                  , bytestring
+                  , base64-string
+                  , zlib
+                  , directory
+                  , filepath
+                  , containers
+                  , process
+                  , parsedate >= 3000.0.0
+                  , xhtml
+                  , utf8-string >= 0.3.3
+                  , pandoc
+                  , parsec >= 2
+                  , gravatar >= 0.3
+                  , data-default >= 0.2
+                  , mps >= 2009.9.18
+                  , hcheat >= 2009.6.25
+                  , hack >= 2009.10.30
+                  , hack-contrib >= 2009.11.1
   hs-source-dirs: src/
   exposed-modules:  
                     Bamboo
diff --git a/changelog.md b/changelog.md
--- a/changelog.md
+++ b/changelog.md
@@ -1,3 +1,10 @@
+2009.11.1
+---------
+
+### Fix
+
+* comment bug
+
 2009.8.16
 ---------
 
diff --git a/readme.md b/readme.md
--- a/readme.md
+++ b/readme.md
@@ -1,4 +1,4 @@
-# Bamboo: a simple blog middleware on hack
+# Bamboo: a simple blog engine on hack
 
 Bamboo is a port of [Panda](http://github.com/nfjinjing/panda/tree), but runs on top of Hack. It's an experimental project but quite portable.
 
@@ -110,3 +110,13 @@
 * [bamboo-launcher](http://github.com/nfjinjing/bamboo-launcher)
 * [bamboo-plugin-highlight](http://github.com/nfjinjing/bamboo-plugin-highlight)
 * [bamboo-plugin-photo](http://github.com/nfjinjing/bamboo-plugin-photo)
+
+## That's it
+
+郑板桥（1693~1765） 修竹幽兰图
+
+<a href="http://github.com/nfjinjing/bamboo/raw/master/bamboo.jpg">
+  <img src="http://github.com/nfjinjing/bamboo/raw/master/bamboo-thumb.jpg" />
+</a>
+
+
diff --git a/src/Bamboo/Controller/Application.hs b/src/Bamboo/Controller/Application.hs
--- a/src/Bamboo/Controller/Application.hs
+++ b/src/Bamboo/Controller/Application.hs
@@ -12,6 +12,7 @@
 import Bamboo.Controller.Static
 import Bamboo.Controller.Tag
 import qualified Bamboo.Type.ThemeInterface as I
+import Data.Maybe (catMaybes)
 
 paths_with_theme :: I.Theme -> [(String, Application)]
 paths_with_theme t = 
@@ -25,8 +26,7 @@
   ,  for_extension  Search  $ x "/search"    I.Search              search           
   ,  for_extension  Comment $ Just ("/comment/create", comment_create )
   ]
-  .filter isJust
-  .map fromJust
+  .catMaybes
   .map_fst ("^" ++)
   
   where
diff --git a/src/Bamboo/Controller/Comment.hs b/src/Bamboo/Controller/Comment.hs
--- a/src/Bamboo/Controller/Comment.hs
+++ b/src/Bamboo/Controller/Comment.hs
@@ -11,6 +11,7 @@
 import qualified Bamboo.Model.Comment as Comment
 import qualified Bamboo.Model.Post as Post
 import qualified Bamboo.Type.State as S
+import MPS (trace')
 
 
 comment_create :: Application
@@ -28,7 +29,7 @@
   when ([checked, valid_path, exists].and) $
     env.inputs.Comment.create_comment
   
-  return $ def.redirect ((uid.Post.id_to_uri.u2b).unescape_uri) Nothing
+  return $ def.redirect ((uid.Post.id_to_uri.u2b).unescape_uri.("/" /)) Nothing .trace'
   
   where
     get_input_data s = env.get_input (s.show_data)
diff --git a/src/Bamboo/Helper/PreludeEnv.hs b/src/Bamboo/Helper/PreludeEnv.hs
--- a/src/Bamboo/Helper/PreludeEnv.hs
+++ b/src/Bamboo/Helper/PreludeEnv.hs
@@ -8,4 +8,4 @@
 import Prelude hiding (
   (.), (/), (^), id, span, readFile, writeFile, div, (>), (^^)
   )
-import MPSUTF8 hiding (base, date, format_time, (-))
+import MPSUTF8 hiding ((<), base, date, format_time, (-))