suzanne.soy/hyper-literate
1
0
Fork 0
Code Issues 4 Pull Requests 1 Actions Packages Projects Releases Wiki Activity

fix scribble --redirect-main with indirect links

Browse Source
This commit is contained in:
Matthew Flatt 2016-02-25 08:53:42 -07:00
parent 17acde5a1f
commit 4d62fba7f2
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
scribble-lib/scribble/html-render.rkt
View File

@ -1346,7 +1346,7 @@
(if (or indirect-link? dest) (if (or indirect-link? dest)
`((a ([href `((a ([href
,(cond ,(cond
[(and ext-id external-root-url [(and ext-id external-root-url dest
(let* ([ref-path (relative->path (dest-path dest))] (let* ([ref-path (relative->path (dest-path dest))]
[rel (if (relative-path? ref-path) [rel (if (relative-path? ref-path)
#f #f