suzanne.soy/scribble-enhanced
1
0
Fork 0
Code Issues 1 Pull Requests 1 Actions Packages Projects Releases Wiki Activity

path->collects-path: repair for single-collection packages

Browse Source 
Added an optional `#:cache' argument that is propagated to
`path->pkg', if necessary.

original commit: 4500c7c4d54a7645b6bfe412df1d270567938427
This commit is contained in:
Matthew Flatt 2013-07-17 14:31:41 -06:00
parent 9f946d1932
commit 1bb5584dc9
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
pkgs/scribble-pkgs/scribble-lib/scribble/html-render.rkt
View File

@ -255,12 +255,14 @@
root-relative->path
root-relative?)
(define path-cache (make-hash))
(define (path->relative p)
(let ([p (path->main-doc-relative p)])
(if (path? p)
(let ([p (path->root-relative p)])
(if (path? p)
(let ([p (path->collects-relative p)])
(let ([p (path->collects-relative p #:cache path-cache)])
(if (path? p)
p
(intern-taglet p)))