correct path examples

This commit is contained in:
Robby Findler 2017-10-31 16:12:21 -05:00
parent 4258c3bfe6
commit b9cd60010f

View File

@ -389,8 +389,8 @@ see @secref["windowspaths"] for more information.
@techlink{Cleanse}s @racket[path] (as described at the beginning of @techlink{Cleanse}s @racket[path] (as described at the beginning of
this chapter) without consulting the filesystem. this chapter) without consulting the filesystem.
@examples[#:eval (make-base-eval) @examples[#:eval (make-base-eval '(require racket/path))
(let ([p (build-path/convention-type 'unix "foo//bar")]) (let ([p (string->some-system-path "tiny//dancer" 'unix)])
(cleanse-path p)) (cleanse-path p))
]} ]}
@ -451,8 +451,8 @@ simplification).
See @secref["unixpaths"] and @secref["windowspaths"] for more See @secref["unixpaths"] and @secref["windowspaths"] for more
information on simplifying paths. information on simplifying paths.
@examples[#:eval (make-base-eval) @examples[#:eval (make-base-eval '(require racket/path))
(let ([p (build-path/convention-type 'unix "foo//bar/baz/..")]) (let ([p (string->some-system-path "tiny//in/my/head/../../../dancer" 'unix)])
(simplify-path p #f)) (simplify-path p #f))
]} ]}