diff --git a/collects/scribble/html-render.ss b/collects/scribble/html-render.ss
index 56f02ec678..5e350338bf 100644
--- a/collects/scribble/html-render.ss
+++ b/collects/scribble/html-render.ss
@@ -77,7 +77,7 @@
(type "text/css")
(href "scribble.css")
(title "default"))))
- (body ,@(render-part d ht)))])
+ (body (div ((class "main")) ,@(render-part d ht))))])
(install-file scribble-css)
(xml:write-xml/content (xml:xexpr->xml xpr)))))
diff --git a/collects/scribble/scribble.css b/collects/scribble/scribble.css
index f0eeb46478..3765a966fe 100644
--- a/collects/scribble/scribble.css
+++ b/collects/scribble/scribble.css
@@ -2,11 +2,16 @@
body {
color: black;
background-color: #ffffff;
- max-width: 35em;
+ font-family: Times;
+ text-align: center;
+ width: 35em;
margin-left: auto;
margin-right: auto;
- padding-left: 0.5em;
- font-family: Times;
+ }
+
+ .main {
+ width: 35em;
+ text-align: left;
}
.refpara {
diff --git a/collects/scribblings/guide/apply.scrbl b/collects/scribblings/guide/apply.scrbl
index cbec70e0bd..4fae4b8321 100644
--- a/collects/scribblings/guide/apply.scrbl
+++ b/collects/scribblings/guide/apply.scrbl
@@ -113,7 +113,7 @@ procedure to the arguments:
(avg '(1 2 3 4))
]
-As a convenience, the @scheme[apply] produce accepts additional
+As a convenience, the @scheme[apply] procedure accepts additional
arguments between the procedure and the list. The additional arguments
are effectively @scheme[cons]ed onto the argument list:
@@ -126,7 +126,7 @@ are effectively @scheme[cons]ed onto the argument list:
The @scheme[apply] procedure supports only by-position arguments. To
apply a procedure with keyword arguments, use the
@scheme[keyword-apply] procedure, which accepts a procedure to apply
-and two lists. The first list contains contains pairs, each matching a
+and two lists. The first list contains pairs, each matching a
keyword with its corresponding value. The second list contains
by-position procedure arguments, as for @scheme[apply].