internals: append rather than prepend forecasted txns

This commit is contained in:
Simon Michael 2019-02-01 11:29:22 -08:00
parent f1d4b39146
commit 4a9fa5cd38

View File

@ -161,7 +161,7 @@ journalAddForecast opts@CliOpts{reportopts_=ropts} j = do
] ]
return $ return $
if forecast_ ropts if forecast_ ropts
then journalBalanceTransactions' opts j{ jtxns = concat [forecasttxns, jtxns j] } then journalBalanceTransactions' opts j{ jtxns = concat [jtxns j, forecasttxns] }
else j else j
where where
journalBalanceTransactions' opts j = journalBalanceTransactions' opts j =