fix: import: --catchup works again [simonmichael#2156]

adept · Mar 8, 2024 · 3e62f2e · 3e62f2e
1 parent cd083e9
commit 3e62f2e
Showing 1 changed file with 6 additions and 2 deletions.
diff --git a/hledger/Hledger/Cli/Commands/Import.hs b/hledger/Hledger/Cli/Commands/Import.hs
@@ -65,8 +65,12 @@ importcmd opts@CliOpts{rawopts_=rawopts,inputopts_=iopts} j = do
               let semicolon = if dryrun then "; " else "" :: String
               printf "%sno new transactions found in %s\n\n" semicolon inputstr
 
-            newts | catchup -> do
-              printf "marked %s as caught up, skipping %d unimported transactions\n\n" inputstr (length newts)
+            newts | catchup ->
+              if dryrun
+                then printf "--catchup would skip %d transactions (dry run)\n\n" (length newts)
+                else do
+                  printf "marked %s as caught up, skipping %d transactions\n\n" inputstr (length newts)
+                  saveLatestDatesForFiles latestdatesforfiles
 
             newts -> do
               if dryrun