-

private/downloader.rkt

@@ -12,6 +12,7 @@
          )
 
 (provide download-soundlibs
+         soundlibs-clear-download!
          soundlibs-version
          soundlibs-directory
          soundlibs-available?
@@ -128,6 +129,9 @@
           (close-input-port in))
         d))))
 
+(define (soundlibs-clear-download!)
+  (delete-file version-file))
+
 (define (download-soundlibs)
   (let ((in (download-port download-url)))
     (unless (input-port? in)