diff --git a/functional-tests/thin-functional-tests.scm b/functional-tests/thin-functional-tests.scm index a771bd7..07fd62c 100644 --- a/functional-tests/thin-functional-tests.scm +++ b/functional-tests/thin-functional-tests.scm @@ -145,6 +145,11 @@ (with-valid-metadata (md) (run-ok (thin-check "--clear-needs-check-flag" md)))) + (define-scenario (thin-check fix-metadata-leaks) + "Accepts --fix-metadata-leaks" + (with-valid-metadata (md) + (run-ok (thin-check "--fix-metadata-leaks" md)))) + (define-scenario (thin-check tiny-metadata) "Prints helpful message in case tiny metadata given" (with-temp-file-sized ((md "thin.bin" 1024))