From 4863ea1608a9927c2d6203c7d1e8d108b4bebc48 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Wed, 19 Jun 2013 13:26:51 -0600 Subject: [PATCH] paint-by-numbers: fix path construction Syntaxes of filesystem paths and module paths are not the same under Windows. --- pkgs/games/paint-by-numbers/all-problems.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/pkgs/games/paint-by-numbers/all-problems.rkt b/pkgs/games/paint-by-numbers/all-problems.rkt index 8a0404998b..eb70e19f7b 100644 --- a/pkgs/games/paint-by-numbers/all-problems.rkt +++ b/pkgs/games/paint-by-numbers/all-problems.rkt @@ -16,7 +16,7 @@ (let* ([prob-dir (collection-file-path "problems" "games" "paint-by-numbers")] [files (call-with-input-file (build-path prob-dir "directory") read)]) (for/list ([file files] #:when (file-exists? (build-path prob-dir file))) - (define path-spec (path->string (build-path "problems" file))) + (define path-spec (string-append "problems" "/" file)) path-spec))]) #'(list (include unit-names) ...))]))