import: if there's nothing to import, be quiet
This commit is contained in:
parent
9acce249bb
commit
e120e261bd
@ -49,7 +49,7 @@ importcmd opts@CliOpts{rawopts_=rawopts,inputopts_=iopts} j = do
|
|||||||
Left e -> error' e
|
Left e -> error' e
|
||||||
Right newj ->
|
Right newj ->
|
||||||
case sortBy (comparing tdate) $ jtxns newj of
|
case sortBy (comparing tdate) $ jtxns newj of
|
||||||
[] -> putStrLn "no new transactions"
|
[] -> return ()
|
||||||
newts | dryrun -> do
|
newts | dryrun -> do
|
||||||
printf "; would import %d new transactions:\n\n" (length newts)
|
printf "; would import %d new transactions:\n\n" (length newts)
|
||||||
-- TODO how to force output here ?
|
-- TODO how to force output here ?
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user