Reset file info for administrating changes, to prevent audio manager processing files twice that are essentially unchanged.

private/file-walker.rkt

@@ -11,6 +11,7 @@
 
 (provide make-file-walker
          make-file-admin
+         reset-file-admin-info
          fw-add-step
          os-path
          )
@@ -102,6 +103,13 @@
       )
     ))
 
+(define (reset-file-admin-info path info)
+  (when (eq? (hash-ref info 'type #f) 'file)
+    (hash-set! info 'size (file-size path))
+    (hash-set! info 'mtime (file-or-directory-modify-seconds path))
+    )
+  )
+
 (define (make-file-admin base-path db-store #:filename-cleaner [fc-f (λ (f) f)])
 
   (define (file-info-equal? i1 i2)