deleted counted right

2026-06-25 22:06:30 +02:00
parent f63c902d4d
commit fd8ff1ab1e
1 changed files with 1 additions and 1 deletions
@@ -207,6 +207,7 @@
                                #".opus")))
                (set! processed-opus (+ processed-opus 1))
                (unless (file-exists? opus-file)
+                  (info-am "Converting flac to opus: ~a" opus-file)
                  (rep-opus
                   (format "Converting flac to opus: ~a" (basename opus-file)))
                  (with-handlers ([exn? (λ (e)
@@ -252,7 +253,6 @@
        (let ((path-part (get-path-part info)))
          (unless (eq? path-part #f)
            (let ((rm-path (build-path opus-path path-part)))
-              (set! deleted-files (+ deleted-files 1))
              (delete-directory/files rm-path #:must-exist? #f)
              (let ((normalized-sub-path (hash-ref info 'path)))
                (hash-remove! file-db-hash normalized-sub-path))