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

fix up link when main doc has the (redundant) 'toc style

Browse Source 
svn: r9650

original commit: 9389ac3a7ebd50f3fe520d70b218c4a07579f53f
This commit is contained in:
Matthew Flatt 2008-05-05 03:05:08 +00:00
parent ce8852492a
commit 3ac5bf77fd
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
collects/scribble/html-render.ss
View File

@ -617,7 +617,8 @@
(if (or parent up-path) (if (or parent up-path)
(make-target-url (make-target-url
(if parent (if parent
(if (toc-part? parent) (if (and (toc-part? parent)
(part-parent parent ri))
(derive-filename parent) (derive-filename parent)
"index.html") "index.html")
up-path) up-path)