diff --git a/collects/scribble/html-render.rkt b/collects/scribble/html-render.rkt index 56b176e6..cf33a004 100644 --- a/collects/scribble/html-render.rkt +++ b/collects/scribble/html-render.rkt @@ -1121,7 +1121,11 @@ url (combine-url/relative (string->url external-root-url) - (string-join (map path-element->string + (string-join (map (lambda (s) + (case s + [(up) ".."] + [(same) "."] + [else (path-element->string s)])) (explode-path rel)) "/")) [fragment