documentation and small bug fixes
This commit is contained in:
@@ -33,7 +33,12 @@
|
||||
(encoder-settings (hash 'target-sample-rate rate
|
||||
'compression-level 8))
|
||||
)
|
||||
(with-handlers ([exn? (λ (e)
|
||||
(with-handlers ([exn:break? (λ (e)
|
||||
(err-am "Ctrl-c used")
|
||||
(when (file-exists? tmp-file)
|
||||
(delete-file tmp-file))
|
||||
(raise e))]
|
||||
[exn? (λ (e)
|
||||
(err-am (format "~a" e))
|
||||
(when (file-exists? tmp-file)
|
||||
(delete-file tmp-file))
|
||||
|
||||
Reference in New Issue
Block a user