diff --git a/CHANGES b/CHANGES
--- a/CHANGES
+++ b/CHANGES
@@ -1,3 +1,7 @@
+Version 0.7.2 released 02 Jan 2010
+
+* Now compiles with GHC 6.12.
+
 Version 0.7.1 released 02 Jan 2010
 
 * Updated exports to work with pandoc 1.4.
diff --git a/Network/Gitit/Config.hs b/Network/Gitit/Config.hs
--- a/Network/Gitit/Config.hs
+++ b/Network/Gitit/Config.hs
@@ -46,7 +46,6 @@
 import System.IO.UTF8
 #endif
 import System.FilePath ((</>))
-import Control.Monad (liftM)
 import Text.Pandoc
 
 forceEither :: Show e => Either e a -> a
diff --git a/Network/Gitit/ContentTransformer.hs b/Network/Gitit/ContentTransformer.hs
--- a/Network/Gitit/ContentTransformer.hs
+++ b/Network/Gitit/ContentTransformer.hs
@@ -80,7 +80,7 @@
 import qualified Data.FileStore as FS
 import Data.Maybe (mapMaybe)
 import Text.Pandoc
-import Text.Pandoc.Shared (HTMLMathMethod(..), ObfuscationMethod(..))
+import Text.Pandoc.Shared (ObfuscationMethod(..))
 import Text.XHtml hiding ( (</>), dir, method, password, rev )
 import Text.Highlighting.Kate
 import Data.Maybe (isNothing)
diff --git a/Network/Gitit/Feed.hs b/Network/Gitit/Feed.hs
--- a/Network/Gitit/Feed.hs
+++ b/Network/Gitit/Feed.hs
@@ -25,7 +25,6 @@
 import Control.Monad
 import Data.DateTime
 import Data.List (intercalate, sortBy)
-import Data.Maybe
 import Data.Ord (comparing)
 import Network.URI (isAllowedInURI, escapeURIString)
 import System.FilePath
diff --git a/Network/Gitit/Handlers.hs b/Network/Gitit/Handlers.hs
--- a/Network/Gitit/Handlers.hs
+++ b/Network/Gitit/Handlers.hs
@@ -54,12 +54,10 @@
                       )
 where
 import Safe
-import Data.FileStore
 import Data.FileStore.Utils (isInsideDir)
 import Network.Gitit.Server
 import Network.Gitit.Framework
 import Network.Gitit.Layout
-import Network.Gitit.State
 import Network.Gitit.Types
 import Network.Gitit.Feed (filestoreToXmlFeed, FeedConfig(..))
 import Network.Gitit.Util (orIfNull)
@@ -71,11 +69,11 @@
 import Data.ByteString.UTF8 (toString)
 import System.Time
 import System.FilePath
-import Prelude hiding (readFile, writeFile, catch)
+import Prelude hiding (readFile, catch)
 -- Note: ghc >= 6.12 (base >=4.2) supports unicode through iconv
 -- So we use System.IO.UTF8 only if we have an earlier version
 #if MIN_VERSION_base(4,2,0)
-import Prelude (readFile, writeFile)
+import Prelude (readFile)
 #else
 import System.IO.UTF8
 #endif
diff --git a/Network/Gitit/Initialize.hs b/Network/Gitit/Initialize.hs
--- a/Network/Gitit/Initialize.hs
+++ b/Network/Gitit/Initialize.hs
@@ -42,7 +42,6 @@
 import System.IO.UTF8
 #endif
 import Text.Pandoc
-import Text.Pandoc.Shared (HTMLMathMethod(..))
 import System.Log.Logger (logM, Priority(..))
 import qualified Text.StringTemplate as T
 
diff --git a/Network/Gitit/Server.hs b/Network/Gitit/Server.hs
--- a/Network/Gitit/Server.hs
+++ b/Network/Gitit/Server.hs
@@ -38,7 +38,6 @@
 import Happstack.Server.Parts (compressedResponseFilter)
 import Network.Socket (getAddrInfo, defaultHints, addrAddress)
 import Control.Monad.Reader
-import Data.Maybe
 import Data.ByteString.UTF8 as U
 
 withExpiresHeaders :: ServerMonad m => m Response -> m Response
diff --git a/gitit.cabal b/gitit.cabal
--- a/gitit.cabal
+++ b/gitit.cabal
@@ -1,10 +1,10 @@
 name:                gitit
-version:             0.7.1
+version:             0.7.2
 Cabal-version:       >= 1.2
 build-type:          Simple
 synopsis:            Wiki using happstack, git or darcs, and pandoc.
-description:         Gitit is a wiki backed by a git or darcs filestore.
-                     Pages and uploaded files can be modified either
+description:         Gitit is a wiki backed by a git, darcs, or mercurial
+                     filestore.  Pages and uploaded files can be modified either
                      directly via the VCS's command-line tools or through
                      the wiki's web interface. Pandoc is used for markup
                      processing, so pages may be written in
diff --git a/gitit.hs b/gitit.hs
--- a/gitit.hs
+++ b/gitit.hs
@@ -21,10 +21,8 @@
 
 import Network.Gitit
 import Network.Gitit.Server
-import Network.Gitit.Initialize (createStaticIfMissing, createRepoIfMissing)
-import Prelude hiding (writeFile, readFile, catch)
+import Prelude hiding (readFile, catch)
 import System.Directory
-import Network.Gitit.Config (getConfigFromFile)
 import Data.Maybe (isNothing)
 import Control.Monad.Reader
 import System.Log.Logger (Priority(..), setLevel, setHandlers,
@@ -38,8 +36,9 @@
 -- Note: ghc >= 6.12 (base >=4.2) supports unicode through iconv
 -- So we use System.IO.UTF8 only if we have an earlier version
 #if MIN_VERSION_base(4,2,0)
+import Prelude (readFile)
+import System.IO (hPutStrLn)
 #else
-import Prelude hiding (readFile)
 import System.IO.UTF8
 #endif
 import Paths_gitit (version, getDataFileName)