diff --git a/hledger-ui/Hledger/UI/RegisterScreen2.hs b/hledger-ui/Hledger/UI/RegisterScreen2.hs index f6a1569c5..f7336f89e 100644 --- a/hledger-ui/Hledger/UI/RegisterScreen2.hs +++ b/hledger-ui/Hledger/UI/RegisterScreen2.hs @@ -62,7 +62,8 @@ initRegisterScreen2 d args st@AppState{aopts=opts, ajournal=j, aScreen=s@Registe ,tdescription t ,case splitOn ", " otheracctsstr of [s] -> s - _ -> "" + ss -> intercalate ", " ss + -- _ -> "" ,showMixedAmountOneLineWithoutPrice change ,showMixedAmountOneLineWithoutPrice bal )