From 2940a186abc9cf13c312587f4a2b037fa56d2a63 Mon Sep 17 00:00:00 2001 From: Spencer Florence Date: Thu, 22 Oct 2015 12:23:37 -0500 Subject: [PATCH] fix improperly loading module-suffixes --- cover/raco.rkt | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/cover/raco.rkt b/cover/raco.rkt index 16ed2fe..e11aa5e 100644 --- a/cover/raco.rkt +++ b/cover/raco.rkt @@ -243,7 +243,10 @@ (case new-omits [(#f) null] [(all) (->absolute (current-directory))] - [else (map (lambda (x) (if (regexp? x) x (->absolute x))) + [else (map (lambda (x) + (cond [(regexp? x) x] + [(bytes? x) (regexp (bytes->string/locale x))] + [else (->absolute x)])) new-omits)])) (define (path-add-argv path argvs)