From 3b6a8b09569b5ba698e819a4f305bc91593c175b Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Fri, 26 Jun 2020 13:55:42 -0700 Subject: [PATCH] ui: register: elide multicommodity amounts --- hledger-ui/Hledger/UI/RegisterScreen.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/hledger-ui/Hledger/UI/RegisterScreen.hs b/hledger-ui/Hledger/UI/RegisterScreen.hs index a9723da39..9cca62839 100644 --- a/hledger-ui/Hledger/UI/RegisterScreen.hs +++ b/hledger-ui/Hledger/UI/RegisterScreen.hs @@ -95,8 +95,8 @@ rsInit d reset ui@UIState{aopts=_uopts@UIOpts{cliopts_=CliOpts{reportopts_=ropts [s] -> s ss -> intercalate ", " ss -- _ -> "" -- should do this if accounts field width < 30 - ,rsItemChangeAmount = showMixedAmountOneLineWithoutPrice False change - ,rsItemBalanceAmount = showMixedAmountOneLineWithoutPrice False bal + ,rsItemChangeAmount = showMixedAmountElided False change + ,rsItemBalanceAmount = showMixedAmountElided False bal ,rsItemTransaction = t } -- blank items are added to allow more control of scroll position; we won't allow movement over these