guide edits

svn: r6342

original commit: b6391ebfdd0cd710b632714b61305edf401fa602

collects/scribble/html-render.ss

@@ -183,7 +183,7 @@
 
       (define/override (render-table t part ht)
         `((table ((cellspacing "0") ,@(case (table-style t)
-                                        [(boxed) '((width "100%") (bgcolor "lightgray"))]
+                                        [(boxed) '((width "100%") (bgcolor "#E8E8FF"))]
                                         [(centered) '((align "center"))]
                                         [(at-right) '((align "right"))]
                                         [(at-left) '((align "left"))]

collects/scribble/scheme.ss

@@ -248,6 +248,18 @@
                    p-color)
               (set! src-col (+ src-col 1))
               (hash-table-put! col-map src-col dest-col))]
+           [(hash-table? (syntax-e c))
+            (advance c init-line!)
+            (let ([equal-table? (hash-table? (syntax-e c) 'equal)])
+              (out (if equal-table?
+                       "#hash"
+                       "#hasheq")
+                   value-color)
+              (set! src-col (+ src-col 5 (if equal-table? 2 0)))
+              (hash-table-put! col-map src-col dest-col)
+              ((loop init-line! +inf.0)
+               (syntax-ize (hash-table-map (syntax-e c) cons)
+                           (syntax-column c))))]
            [else
             (advance c init-line!)
             (let-values ([(s it? sub?)

collects/scribble/scribble.css

@@ -18,11 +18,12 @@
                }
 
                .refcontent { 
-                background-color: beige;
+                background-color: #F5F5DC;
                 display: block;
                 position: relative;
                 width: 10em;
                 font-size: 85%;
+                border: 0.5em solid #F5F5DC;
                }
 
                h1,h2,h3,h4,h5,h6 {