diff --git a/Haslo.hs b/Haslo.hs
--- a/Haslo.hs
+++ b/Haslo.hs
@@ -37,4 +37,4 @@
 niceShow (Right xs) = mapM_ (putStrLn . show) xs
 niceShow (Left err) = putStrLn $ show err
 
-getVersionHaslo = "0.1"
+getVersionHaslo = "0.1.1"
diff --git a/Haslo/CalcConstructors.hs b/Haslo/CalcConstructors.hs
--- a/Haslo/CalcConstructors.hs
+++ b/Haslo/CalcConstructors.hs
@@ -202,7 +202,7 @@
               unfoldedBalloon | durOfBal > fromIntegral x = replicate x newI
                               | otherwise                 = replicate durOfBal' i ++ [lastInst]
                   where newI = myRound (rounding param) $
-                               rawCalcInstCl (fromIntegral $ calcCapBeforeBal b r) x r 0
+                               rawCalcInstCl (fromIntegral b) x r 0
         in lift $ newLoanR c $ replicate d 0 ++ replicate n i ++ unfoldedBalloon
 
     extract (UnfdBalloonPlus p n d r _ _) = InstalmentLoanData p n d r
diff --git a/haslo.cabal b/haslo.cabal
--- a/haslo.cabal
+++ b/haslo.cabal
@@ -1,11 +1,11 @@
 Name:		haslo
-Version:	0.1
+Version:	0.1.1
 License:	BSD3
 License-file: license
 Author:		Bartosz Wojcik
 Maintainer:	Bartosz Wojcik <bartoszmwojcik@gmail.com>
 Copyright:  Copyright (c) 2011 Bartosz Wojcik
-Category:	Financial
+Category:	Finance
 Synopsis:	Loan calculator engine.
 Stability:  experimental
 Build-type:	Simple
@@ -16,7 +16,7 @@
 Cabal-Version: >=1.2.3
 
 library
-  Build-Depends:	base >= 3 && < 5, old-time, wtk, mtl
+  Build-Depends:	base >= 3 && < 5, old-time, wtk >= 0.2, mtl
   Exposed-Modules: Haslo
   Other-Modules: Haslo.BasicType,
                  Haslo.CalcCalendar,