diff --git a/Test/HUnit/Gui/Runner.hs b/Test/HUnit/Gui/Runner.hs
--- a/Test/HUnit/Gui/Runner.hs
+++ b/Test/HUnit/Gui/Runner.hs
@@ -11,6 +11,7 @@
 runTests (GuiInterface updateTestsRun updateFailureDetails updateTestBar) tests = do
   (counts', _) <- performTest reportStart reportErrors reportFailures GuiUpdater tests
   updateTestsRun $ showCounts counts'
+  updateTestBar counts'
   return counts'
     where
       reportStart state _ = do
diff --git a/hunit-gui.cabal b/hunit-gui.cabal
--- a/hunit-gui.cabal
+++ b/hunit-gui.cabal
@@ -1,5 +1,5 @@
 Name:           hunit-gui
-Version:        0.1.3
+Version:        0.1.4
 Cabal-Version:  >= 1.6
 License:        PublicDomain
 Author:         Kim Wallmark