diff --git a/CHANGELOG b/CHANGELOG
--- a/CHANGELOG
+++ b/CHANGELOG
@@ -1,6 +1,9 @@
 CHANGELOG for Haskell Pdf Presenter
 ========================================
 
+0.2.5
+	* Fixed missing minus sign in negative times
+
 0.2.4
 	* Change keybinding for changing monitors from "S" to "M"
 	* Fix positioning errors in the Glade GUI file
diff --git a/HaskellPdfPresenter.glade b/HaskellPdfPresenter.glade
--- a/HaskellPdfPresenter.glade
+++ b/HaskellPdfPresenter.glade
@@ -8,7 +8,7 @@
     <property name="destroy_with_parent">True</property>
     <property name="type_hint">dialog</property>
     <property name="program_name">Haskell Pdf Presenter</property>
-    <property name="version">Version 0.2.4</property>
+    <property name="version">Version 0.2.5</property>
     <property name="copyright" translatable="yes">Copyright 2012-2013, Michael D. Adams</property>
     <property name="website">http://michaeldadams.org</property>
     <property name="website_label" translatable="yes">http://michaeldadams.org</property>
diff --git a/HaskellPdfPresenter.hs b/HaskellPdfPresenter.hs
--- a/HaskellPdfPresenter.hs
+++ b/HaskellPdfPresenter.hs
@@ -69,7 +69,7 @@
  , pageAdjustment :: Adjustment
 }
 
-header = "Haskell Pdf Presenter, version 0.2.4, <http://michaeldadams.org/projects/haskell-pdf-presenter>\nUsage: hpdfp [OPTION...] file"
+header = "Haskell Pdf Presenter, version 0.2.5, <http://michaeldadams.org/projects/haskell-pdf-presenter>\nUsage: hpdfp [OPTION...] file"
 options = [
    Option "h?" ["help"] (NoArg (const $ putStr (usageInfo header options) >> exitSuccess)) "Display usage message"
  , Option "s" ["slide"] (argOption initSlide "slide" maybeRead "INT") "Initial slide number (default 1)"
@@ -876,7 +876,8 @@
 
 -- Format time for display to user.  Format: H:MM:SS or -H:MM:SS
 formatTime :: Integer -> String
-formatTime microseconds = printf "%d:%02d:%02d" hours (abs minutes) (abs seconds) where
+formatTime microseconds = printf "%s%d:%02d:%02d" sign (abs hours) (abs minutes) (abs seconds) where
+  sign = if microseconds < 0 then "-" else ""
   ((((hours, minutes), seconds), _tenths), _) = id // 60 // 60 // 10 // (100*1000) $ microseconds
   (//) f base val = (f q, r) where (q, r) = val `quotRem` base
 
diff --git a/haskell-pdf-presenter.cabal b/haskell-pdf-presenter.cabal
--- a/haskell-pdf-presenter.cabal
+++ b/haskell-pdf-presenter.cabal
@@ -4,7 +4,7 @@
 -- The package version. See the Haskell package versioning policy
 -- (http://www.haskell.org/haskellwiki/Package_versioning_policy) for
 -- standards guiding when and how versions should be incremented.
-Version:             0.2.4
+Version:             0.2.5
 
 -- A short (one-line) description of the package.
 Synopsis:            Tool for presenting PDF-based presentations.
@@ -76,4 +76,4 @@
 Source-repository this
   Type: mercurial
   Location: http://michaeldadams.org/repos-pub/hg/haskell-pdf-presenter/
-  Tag: v0.2.4
+  Tag: v0.2.5