diff --git a/Gitit.hs b/Gitit.hs
--- a/Gitit.hs
+++ b/Gitit.hs
@@ -63,7 +63,7 @@
 import System.IO.Unsafe (unsafePerformIO)
 
 gititVersion :: String
-gititVersion = "0.3.3"
+gititVersion = "0.3.4.1"
 
 sessionTime :: Int
 sessionTime = 60 * 60     -- session will expire 1 hour after page request
diff --git a/Gitit/HAppS.hs b/Gitit/HAppS.hs
--- a/Gitit/HAppS.hs
+++ b/Gitit/HAppS.hs
@@ -33,10 +33,10 @@
 import Data.ByteString.Lazy.UTF8 (toString)
 import Codec.Binary.UTF8.String (encodeString, decodeString)
 
--- HAppS's look, lookRead, and lookCookieValue encode unicode characters
--- (outside the standard latin1 range) using decimal character
--- references. For gitit's purposes, we want them to return regular
--- unicode characters instead.
+-- Contents of an HTML text area or text field generated by Text.XHtml
+-- will often contain decimal character references.  We want to convert these
+-- to regular unicode characters.  We also need to use toString to
+-- convert from UTF-8, since HAppS doesn't do this.
 
 look :: String -> RqData String
 look = liftM (decodeCharacterReferences . toString) . HAppS.Server.lookBS
diff --git a/gitit.cabal b/gitit.cabal
--- a/gitit.cabal
+++ b/gitit.cabal
@@ -1,5 +1,5 @@
 name:                gitit
-version:             0.3.4
+version:             0.3.4.1
 Cabal-version:       >= 1.2
 build-type:          Simple
 synopsis:            Wiki using HAppS, git, and pandoc.