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

.

Browse Source 
original commit: 2cf13c160ca5ebc7837529431d1fcb9e89fc61d9
This commit is contained in:
Matthew Flatt 1998-11-28 03:52:27 +00:00
parent baa58bce59
commit ef7651c212
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
collects/help/help.ss
View File

@ -1,16 +1,12 @@
#| #|
TODO: TODO:
* starting location as option * demonstrate setup-plt launcher
* define a max hit count
* setup-plt launcher
* manuals as `doc' sub-collections? * manuals as `doc' sub-collections?
* doc.txt in sub-collections? * doc.txt in sub-collections?
* document help system * document help system
* keywordize and index existing doc.txt files
|# |#
@ -22,8 +18,12 @@
(require-library "url.ss" "net") (require-library "url.ss" "net")
(define startup-url
(string-append "file:" (build-path (collection-path "doc") "index.htm")))
(invoke-unit/sig (invoke-unit/sig
(require-relative-library "helpr.ss") (require-relative-library "helpr.ss")
help:option^
mzlib:function^ mzlib:function^
mzlib:string^ mzlib:string^
mzlib:file^ mzlib:file^