add: tweak output
This commit is contained in:
parent
edcfd2abb1
commit
47a4c52904
@ -69,7 +69,7 @@ getAndAddTransactionsLoop j opts defdate moredefs = do
|
||||
hPrintf stderr "\nStarting a new transaction.\n"
|
||||
t <- getTransaction j opts defdate moredefs
|
||||
j' <- journalAddTransaction j opts t
|
||||
hPrintf stderr "\nAdded to the journal.\n"
|
||||
hPrintf stderr "Added to the journal.\n"
|
||||
let defdate' = showDate $ tdate t
|
||||
getAndAddTransactionsLoop j' opts defdate' []
|
||||
|
||||
|
||||
Loading…
Reference in New Issue
Block a user