42 lines
1.7 KiB
Scheme
42 lines
1.7 KiB
Scheme
#lang scheme/base
|
|
|
|
(provide (all-defined-out))
|
|
|
|
;; Configuration of various parts of the main pages
|
|
|
|
(define bug-url "http://bugs.plt-scheme.org/")
|
|
|
|
;; Link definitions: (id-sym title root-sym/#f-for-url subpath/url),
|
|
;; or a `---' for a spacer; the root-sym can be `plt' for standard
|
|
;; pages, or `user' for pages that have an installation and a
|
|
;; user-specific version (and navigating to them should get to the
|
|
;; user-specific pages using cookies). (Note: the subpath must match
|
|
;; where the corresponding document is generated, this is a hack.)
|
|
(define links
|
|
`((start "PLT Scheme" user "index.html")
|
|
(search "Search Manuals" user "search/index.html")
|
|
---
|
|
(license "License" plt "license/index.html")
|
|
(acks "Acknowledgements" plt "acks/index.html")
|
|
(release "Release Notes" plt "release/index.html")
|
|
---
|
|
(index "Master Index" user "master-index/index.html")
|
|
---
|
|
(bugreport "Report a Bug" #f ,(format "~a?v=~a" bug-url (version)))))
|
|
|
|
;; Section definitions for manuals that appear on the start page.
|
|
(define manual-sections
|
|
'((getting-started (link "Getting Started" (lib "scribblings/main/getting-started.scrbl")))
|
|
(language "Languages")
|
|
(tool "Tools")
|
|
(gui-library "GUI and Graphics Libraries")
|
|
(net-library "Network Libraries")
|
|
(parsing-library "Parsing Libraries")
|
|
(tool-library "Tool Libraries")
|
|
(foreign "Low-Level APIs")
|
|
(interop "Interoperability")
|
|
(library "Miscellaneous Libraries")
|
|
(experimental "Experimental Languages and Libraries")
|
|
(legacy "Legacy Languages and Libraries")
|
|
(other "Other")))
|