diff --git a/CHANGELOG.md b/CHANGELOG.md
new file mode 100644
--- /dev/null
+++ b/CHANGELOG.md
@@ -0,0 +1,63 @@
+# 0.4.1
+
+ * Make the clock react to time zone changes
+
+# 0.4.0
+
+## Features
+
+ * Resize the bar when the screen configuration changes (Robert Helgesson)
+ * Support bypassing `dyre` by exposing `taffybarMain` (Christian Hoener zu Siederdissen)
+ * Textual CPU and memory monitors (Zakhar Voit)
+ * A new window switcher menu in the pager (José Alfredo Romero L)
+ * Dynamic workspace support in the workspace switcher (Nick Hu)
+ * More configurable network monitor (Arseniy Seroka)
+ * New widget: text-based command runner (Arseniy Seroka)
+ * The Graph widget supports lines graphs (via graphDataStyles) (Joachim Breitner)
+ * Compile with gtk2hs 0.13
+
+## Bug Fixes
+
+ * Reduce wakeups by tweaking the default GHC RTS options (Joachim Breitner)
+ * UTF8 fixes (Nathan Maxson)
+ * Various fixes to EWMH support (José Alfredo Romero L)
+
+## Deprecations
+
+The `XMonadLog` module is deprecated.  This module let taffybar display XMonad desktop information through a dbus connection.  The EWMH desktop support by José Alfredo Romero L is better in every way, so that (through TaffyPager) is the recommended replacement.  Upgrading should be straightforward.
+
+
+# 0.3.0:
+
+ * A new pager (System.Taffybar.TaffyPager) from José A. Romero L.  This pager is a drop-in replacement for the dbus-based XMonadLog widget.  It communicates via X atoms and EWMH like a real pager.  It even supports changing workspaces by clicking on them.  I recommend this over the old widget.
+ * Added an MPRIS2 widget (contributed by Igor Babuschkin)
+ * Ported to use the newer merged dbus library instead of dbus-client/dbus-core (contributed by CJ van den Berg)
+ * Finally have the calendar widget pop up over the date/time widget (contributed by José A. Romero)
+ * GHC 7.6 compatibility
+ * Vertical bars can now have dynamic background colors (suggested by Elliot Wolk)
+ * Bug fixes
+
+# 0.2.1:
+
+ * More robust strut handling for multiple monitors of different sizes (contributed by Morgan Gibson)
+ * New widgets from José A. Romero (network monitor, fs monitor, another CPU monitor)
+ * Allow the bar widget to grow vertically (also contributed by José A. Romero)
+
+# 0.2.0:
+
+ * Add some more flexible formatting options for the XMonadLog widget (contributed by cnervi).
+ * Make the PollingLabel more robust with an exception handler for IOExceptions
+ * Added more documentation for a few widgets
+
+# 0.1.3:
+
+ * Depend on gtk 0.12.1+ to be able to build under ghc 7.2
+ * Fix the background colors in the calendar so that it follows the GTK theme instead of the bar-specific color settings
+ * Fix the display of non-ASCII window titles in the XMonad log applet (assuming you use the dbusLog function)
+ * Add a horrible hack to force the bar to not resize to be larger than the screen due to notifications or long window titles
+
+# 0.1.2:
+
+ * Readable widget for freedesktop notifications
+ * Fixed a few potential deadlocks on startup
+ * Use the GTK+ rc-file styling system for colors instead of hard coding them
diff --git a/src/System/Taffybar/SimpleClock.hs b/src/System/Taffybar/SimpleClock.hs
--- a/src/System/Taffybar/SimpleClock.hs
+++ b/src/System/Taffybar/SimpleClock.hs
@@ -9,7 +9,6 @@
   ) where
 
 import Control.Monad.Trans ( MonadIO, liftIO )
-import Data.Maybe ( fromMaybe )
 import Data.Time.Calendar ( toGregorian )
 import qualified Data.Time.Clock as Clock
 import Data.Time.Format
@@ -67,16 +66,20 @@
 defaultClockConfig :: ClockConfig
 defaultClockConfig = ClockConfig Nothing Nothing
 
+data TimeInfo = TimeInfo { getTZ :: IO TimeZone
+                         , getLocale :: IO TimeLocale
+                         }
+
 -- | A configurable text-based clock widget.  It currently allows for
 -- a configurable time zone through the 'ClockConfig'.
 --
 -- See also 'textClockNew'.
 textClockNewWith :: ClockConfig -> String -> Double -> IO Widget
 textClockNewWith cfg fmt updateSeconds = do
-  defaultTimeZone <- getCurrentTimeZone
-  let timeLocale = fromMaybe defaultTimeLocale userLocale
-      timeZone = fromMaybe defaultTimeZone userZone
-  l    <- pollingLabelNew "" updateSeconds (getCurrentTime' timeLocale fmt timeZone)
+  let ti = TimeInfo { getTZ = maybe getCurrentTimeZone return userZone
+                    , getLocale = maybe (return defaultTimeLocale) return userLocale
+                    }
+  l    <- pollingLabelNew "" updateSeconds (getCurrentTime' ti fmt)
   ebox <- eventBoxNew
   containerAdd ebox l
   eventBoxSetVisibleWindow ebox False
@@ -88,6 +91,10 @@
     userZone = clockTimeZone cfg
     userLocale = clockTimeLocale cfg
     -- alternate getCurrentTime that takes a specific TZ
-    getCurrentTime' :: TimeLocale -> String -> TimeZone -> IO String
-    getCurrentTime' l f z =
-      return . formatTime l f . utcToZonedTime z =<< Clock.getCurrentTime
+    getCurrentTime' :: TimeInfo -> String -> IO String
+    getCurrentTime' ti f = do
+      l <- getLocale ti
+      z <- getTZ ti
+      t <- Clock.getCurrentTime
+      return $ formatTime l f $ utcToZonedTime z t
+
diff --git a/taffybar.cabal b/taffybar.cabal
--- a/taffybar.cabal
+++ b/taffybar.cabal
@@ -1,5 +1,5 @@
 name: taffybar
-version: 0.4.0
+version: 0.4.1
 synopsis: A desktop bar similar to xmobar, but with more GUI
 license: BSD3
 license-file: LICENSE
@@ -11,6 +11,7 @@
 homepage: http://github.com/travitch/taffybar
 data-files: taffybar.rc
 extra-source-files: README.md,
+                    CHANGELOG.md,
                     taffybar.hs.example
 
 description:
@@ -21,7 +22,7 @@
 library
   default-language: Haskell2010
   build-depends: base > 3 && < 5,
-                 time,
+                 time >= 1.4.2 && < 1.5,
                  old-locale,
                  containers,
                  text,