diff --git a/audio-manager.rkt b/audio-manager.rkt
index 2f04047..72b8a14 100644
--- a/audio-manager.rkt
+++ b/audio-manager.rkt
@@ -252,6 +252,7 @@
         (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))