Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

fix finddoc, returns a xexpr now

svn: r8146
  • Loading branch information...
commit 15f06c86c317eff2d3dbd41ebefb239355a497a4 1 parent e7b85d5
Eli Barzilay elibarzilay authored
Showing with 2 additions and 2 deletions.
  1. +1 −1  collects/help/doc.txt
  2. +1 −1  collects/help/private/finddoc.ss
2  collects/help/doc.txt
View
@@ -180,7 +180,7 @@ documentation.
> (finddoc manual index-key label)
This procedure accepts three strings. The first is the name of
a doc collection, the second is an index entry in that manual, and
- the final is a descriptive string. It returns a string representation
+ the final is a descriptive string. It returns a xexpr representation
of an anchor (in HTML) that points to that index entry in the manual.
If the manual is not found, or the index-key is not in the manual,
it returns html code that shows an error. Because the link is
2  collects/help/private/finddoc.ss
View
@@ -16,7 +16,7 @@
(match (lookup manual index-key label)
[(docdir index-key filename anchor title)
`(a ((href ,(string-append
- "file:" (build-path docdir filename))))
+ "file:" (path->string (build-path docdir filename)))))
,label)]
[m m]))
Please sign in to comment.
Something went wrong with that request. Please try again.