paint-by-numbers: fix path construction
Syntaxes of filesystem paths and module paths are not the same under Windows.
This commit is contained in:
parent
8f2b08d0f5
commit
4863ea1608
|
@ -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) ...))]))
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user