adjust document names

svn: r7968

collects/drscheme/drscheme.scrbl

@@ -4,7 +4,7 @@
 (require scribble/manual)
 ]
 
-@title{PLT DrScheme: Programming Environment Manual}
+@title{@bold{DrScheme}: PLT Programming Environment Manual}
 
 Nothing yet.
 

collects/drscheme/tools.scrbl

@@ -11,7 +11,7 @@
 (define (item/cap x . ys) (apply item (bold (format "~a" x)) ": " ys)) ;; indexing missing
 
 ]
-@title{PLT Plugins: DrScheme Extension Manual}
+@title{@bold{Plugins}: Extending DrScheme}
 
 @section{This Manual}
 

collects/framework/framework.scrbl

@@ -4,7 +4,7 @@
 (require scribble/manual)
 ]
 
-@title{PLT Framework: GUI Application Framework}
+@title{@bold{Framework}: PLT GUI Application Framework}
 
 Nothing yet.
 

collects/scribble/manual.ss

@@ -1527,10 +1527,10 @@
                 s)
         s))
 
-  (define (secref s #:doc [doc #f])
+  (define (secref s #:underline? [u? #t] #:doc [doc #f])
-    (make-link-element #f null `(part ,(doc-prefix doc s))))
+    (make-link-element (if u? #f "plainlink") null `(part ,(doc-prefix doc s))))
-  (define (seclink tag #:doc [doc #f] . s)
+  (define (seclink tag #:underline? [u? #t] #:doc [doc #f] . s)
-    (make-link-element #f (decode-content s) `(part ,(doc-prefix doc tag))))
+    (make-link-element (if u? #f "plainlink") (decode-content s) `(part ,(doc-prefix doc tag))))
   (define (*schemelink stx-id id . s)
     (make-link-element #f (decode-content s) (or (register-scheme-definition stx-id)
                                                  (format "--UNDEFINED:~a--" (syntax-e stx-id)))))

collects/scribble/scribble.css

@@ -390,6 +390,11 @@
                color: red;
                }
 
+               .plainlink { 
+               text-decoration: none;
+               color: blue;
+               }
+
                .techlink { 
                text-decoration: none;
                color: black;

collects/scribblings/foreign/foreign.scrbl

@@ -1,7 +1,7 @@
 #lang scribble/doc
 @(require "utils.ss")
 
-@title{PLT Foreign Interface Manual}
+@title{@bold{FFI}: PLT Foreign Interface}
 
 @defmodule[scheme/foreign]
 

collects/scribblings/gui/gui.scrbl

@@ -2,7 +2,7 @@
 @require["common.ss"]
 
 @title[#:tag-prefix '(lib "scribblings/gui/gui.scrbl") 
-       #:tag "top"]{PLT Scheme GUI: MrEd}
+       #:tag "top"]{@bold{GUI}: PLT Graphics Toolkit}
 
 @declare-exporting[scheme/gui/base scheme/gui]
 

collects/scribblings/guide/guide.scrbl

@@ -4,7 +4,7 @@
 @require["guide-utils.ss"]
 
 @title[#:tag-prefix '(lib "scribblings/guide/guide.scrbl") 
-       #:tag "top"]{A Guide to PLT Scheme}
+       #:tag "top"]{@bold{Guide}: PLT Scheme}
 
 This guide is intended for programmers who are new to Scheme, new to PLT
 Scheme, or new to some part of PLT Scheme. It assumes

collects/scribblings/inside/inside.scrbl

@@ -2,7 +2,7 @@
 @(require "utils.ss")
 
 @title[#:tag-prefix '(lib "scribblings/inside/inside.scrbl") 
-       #:tag "top"]{Inside PLT Scheme}
+       #:tag "top"]{@bold{Inside}: PLT Scheme C API}
 
 This manual describes PLT Scheme's C interface, which allows the
 interpreter to be extended by a dynamically-loaded library, or

collects/scribblings/quick/quick.scrbl

@@ -1,7 +1,7 @@
 #lang scribble/doc
 
 @title[#:tag-prefix '(lib "quick.scrbl" "scribblings/quick")
-       #:tag "top"]{An Introduction to PLT Scheme with Pictures}
+       #:tag "top"]{@bold{Quick}: An Introduction to PLT Scheme with Pictures}
 
 @; ----------------------------------------------------------------------
 

collects/scribblings/reference/reference.scrbl

@@ -2,7 +2,7 @@
 @require["mz.ss"]
 
 @title[#:tag-prefix '(lib "scribblings/reference/reference.scrbl")
-       #:tag "top"]{PLT Scheme Reference}
+       #:tag "top"]{@bold{Reference}: PLT Scheme}
 
 This manual defines the core PLT Scheme language and describes its
 most prominent libraries. The companion manual @|Guide| provides a

collects/scribblings/scribble/scribble.scrbl

@@ -4,7 +4,7 @@
 @require["utils.ss"]
 
 @title[#:tag-prefix '(lib "scribblings/scribble/scribble.scrbl") 
-       #:tag "top"]{Scribble}
+       #:tag "top"]{@bold{Scribble}: PLT Documentation Tool}
 
 The @filepath{scribble} collection provides libraries that can be used to
 create documents from Scheme.

collects/scribblings/slideshow/slideshow.scrbl

@@ -3,7 +3,7 @@
 
 @define[paper-url "http://www.cs.utah.edu/plt/publications/jfp05-ff.pdf"]
 
-@title{Slideshow}
+@title{@bold{Slideshow}: PLT Figure and Presentation Tools}
 
 Slideshow is a library for creating presentation slides. Unlike
 Powerpoint, Slideshow provides no WYSIWYG interface for constructing

collects/scribblings/start/start.scrbl

@@ -23,6 +23,11 @@
         (resolve "gui")
         'blank))
 
+(define ending-ones
+  (list 'blank
+        (resolve "foreign")
+        (resolve "inside")))
+
 (let* ([dirs (find-relevant-directories '(scribblings))]
        [infos (map get-info/full dirs)]
        [docs (apply append
@@ -40,7 +45,7 @@
           (list (make-flow (list (make-paragraph (list 
                                                   (if (eq? doc 'blank)
                                                       (hspace 1)
-                                                      (secref #:doc doc "top"))))))))])
+                                                      (secref #:doc doc #:underline? #f "top"))))))))])
 
   (make-delayed-flow-element
    (lambda (renderer part resolve-info)
@@ -49,12 +54,14 @@
       (append (map line initial-ones)
               (sort
                (map line
-                    (remove* initial-ones 
+                    (remove* (append initial-ones 
-                          (remove (resolve "start") 
+                                     ending-ones)
-                                  docs)))
+                             (remove (resolve "start") 
+                                     docs)))
                (lambda (a b)
                  (let ([a (car (paragraph-content (car (flow-paragraphs (car a)))))]
                        [b (car (paragraph-content (car (flow-paragraphs (car b)))))])
                    (string-ci<? (element->string a renderer part resolve-info)
-                                (element->string b renderer part resolve-info))))))))))
+                                (element->string b renderer part resolve-info)))))
+              (map line ending-ones))))))
 ]

doc/release-notes/mzscheme/MzScheme_4.txt

@@ -307,21 +307,21 @@ with some syntactic and name changes.
 
     (define-struct posn (x y)) ; does not declare `set-posn-x!'
 
-  Specify the #:mutable optional for either the entire structure type
+   Specify the #:mutable optional for either the entire structure type
-  or an individual field:
+   or an individual field:
 
-   (define-struct posn (x y) 
+    (define-struct posn (x y) 
-                  #:mutable) ; => `set-posn-x!' and  `set-posn-x!'
+                   #:mutable) ; => `set-posn-x!' and  `set-posn-x!'
-   (define-struct posn ([x #:mutable] y)  ; => just `set-posn-x!'
+    (define-struct posn ([x #:mutable] y)  ; => just `set-posn-x!'
 
-  Use the #:inspector option to specify an inspector, such as
+   Use the #:inspector option to specify an inspector, such as
-  specifying #f to make the structure type tranparent:
+   specifying #f to make the structure type tranparent:
 
-   (define-struct posn (x y) #:inspector #f)
+    (define-struct posn (x y) #:inspector #f)
 
-  Other keyword options such as #:property and #:procedure enable
+   Other keyword options such as #:property and #:procedure enable
-  `define-struct' to reflect all of the funtionality of the underlying
+   `define-struct' to reflect all of the funtionality of the
-  `make-struct-type' function.
+   underlying `make-struct-type' function.
 
  * One-armed `if' is prohibited; use `when', instead.