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.9
+Version:              2009.6.25
 Build-type:           Simple
 Synopsis:             bamboo blueprint theme
 Description:          bamboo blueprint theme
@@ -21,9 +21,9 @@
     , containers, process, parsedate >= 3000.0.0, rss == 3000.0.1
     , xhtml, utf8-string >= 0.3.3, parsec >= 2, gravatar >= 0.3
     , data-default >= 0.2
-    , mps >= 2009.5.13, hcheat >= 2009.5.13
-    , hack >= 2009.5.19, hack-contrib >= 2009.6.9
-    , bamboo >= 2009.6.9
+    , mps >= 2009.6.25, hcheat >= 2009.6.25
+    , hack >= 2009.5.19, hack-contrib >= 2009.6.25
+    , bamboo >= 2009.6.25
   hs-source-dirs: src/
   exposed-modules:  
                     Bamboo.Theme.Blueprint
diff --git a/changelog.md b/changelog.md
--- a/changelog.md
+++ b/changelog.md
@@ -1,3 +1,10 @@
+2009.6.25
+---------
+
+### Fix
+
+* compatible with mps 6.25
+
 2009.6.9
 --------
 
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
@@ -3,7 +3,6 @@
 
 module Bamboo.Theme.Blueprint.Helper where
 
-
 import Bamboo.Env
 import Bamboo.Helper.ByteString
 import Data.ByteString
@@ -11,9 +10,11 @@
 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
+
 
 id :: String -> HtmlAttr
 id = identifier