From 5eca4bb70ea13e560d52bb886f6e90dc10e4d574 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Mon, 24 Aug 2015 15:09:03 -0700 Subject: [PATCH] ui: reg: more width calculation voodoo --- hledger-ui/Hledger/UI/RegisterScreen2.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/hledger-ui/Hledger/UI/RegisterScreen2.hs b/hledger-ui/Hledger/UI/RegisterScreen2.hs index ba2a139a7..c108d8ba9 100644 --- a/hledger-ui/Hledger/UI/RegisterScreen2.hs +++ b/hledger-ui/Hledger/UI/RegisterScreen2.hs @@ -118,7 +118,7 @@ drawRegisterScreen2 AppState{aopts=_opts, aScreen=RegisterScreen2{rs2State=l}} = balwidth = min maxbalwidth maxbalwidthseen -- assign the remaining space to the description and accounts columns - maxdescacctswidth = totalwidth - (whitespacewidth - 4) - changewidth - balwidth + maxdescacctswidth = max 0 (totalwidth - datewidth - changewidth - balwidth - (whitespacewidth - 2)) -- allocating proportionally. -- descwidth' = maximum' $ map (length . second5) displayitems -- acctswidth' = maximum' $ map (length . third5) displayitems