diff --git a/collects/r6rs/scribblings/r6rs.scrbl b/collects/r6rs/scribblings/r6rs.scrbl
index f3bde64010..74daa681ca 100644
--- a/collects/r6rs/scribblings/r6rs.scrbl
+++ b/collects/r6rs/scribblings/r6rs.scrbl
@@ -315,7 +315,7 @@ several known ways:
          (>= #f "r6rs-Z-H-14.html" "node_idx_472")
          (abs #f "r6rs-Z-H-14.html" "node_idx_506")
          (acos #f "r6rs-Z-H-14.html" "node_idx_554")
-         (and #f "r6rs-Z-H-14.html" "node_idx_388")
+         (and #t "r6rs-Z-H-14.html" "node_idx_388")
          (angle #f "r6rs-Z-H-14.html" "node_idx_576")
          (append #f "r6rs-Z-H-14.html" "node_idx_634")
          (apply #f "r6rs-Z-H-14.html" "node_idx_752")
@@ -418,7 +418,7 @@ several known ways:
          (number? #f "r6rs-Z-H-14.html" "node_idx_440")
          (numerator #f "r6rs-Z-H-14.html" "node_idx_524")
          (odd? #f "r6rs-Z-H-14.html" "node_idx_480")
-         (or #f "r6rs-Z-H-14.html" "node_idx_390")
+         (or #t "r6rs-Z-H-14.html" "node_idx_390")
          (pair? #f "r6rs-Z-H-14.html" "node_idx_608")
          (positive? #f "r6rs-Z-H-14.html" "node_idx_476")
          (procedure? #f "r6rs-Z-H-14.html" "node_idx_342")
diff --git a/collects/scribble/scribble.css b/collects/scribble/scribble.css
index 1449295045..ba52b4c19b 100644
--- a/collects/scribble/scribble.css
+++ b/collects/scribble/scribble.css
@@ -456,6 +456,10 @@ i {
   margin-right: 0.3em;
 }
 
+.smaller{ 
+  font-size: 82%;
+}
+
 /* A hack, inserted to break some Scheme ids: */
 .mywbr {
   width: 0;
diff --git a/collects/scribblings/main/private/make-search.ss b/collects/scribblings/main/private/make-search.ss
index 98cbd5ccff..cddc0e96aa 100644
--- a/collects/scribblings/main/private/make-search.ss
+++ b/collects/scribblings/main/private/make-search.ss
@@ -284,8 +284,8 @@
               desc += (j==0 ? "" : ", " )
                       + '<span class="schememod">' + libs[j] + '</span>';
             desc = '&nbsp;&nbsp;'
-                   + '<span style="font-size: 80%;">'
-                   + '<span style="font-size: 80%;">provided from</span> '
+                   + '<span class="smaller">'
+                   + '<span class="smaller">provided from</span> '
                    + desc + '</span>';
           }
           result_links[i].innerHTML =
diff --git a/collects/setup/scribble.ss b/collects/setup/scribble.ss
index d927dd3ae1..5e4d188de2 100644
--- a/collects/setup/scribble.ss
+++ b/collects/setup/scribble.ss
@@ -195,7 +195,8 @@
       (for ([i infos]
             #:when (not (or (info-need-run? i) (not (info-build? i)))))
         (let ([ch (ormap (lambda (i2)
-                           (and (>= (info-out-time i2) (info-time i)) i2))
+                           (or (not (info? i2))
+                               (and (>= (info-out-time i2) (info-time i)) i2)))
                          (info-deps i))])
           (when ch
             (when (verbose)
diff --git a/collects/tests/r6rs/test.ss b/collects/tests/r6rs/test.ss
index e4579bea45..9a89c9f8ce 100644
--- a/collects/tests/r6rs/test.ss
+++ b/collects/tests/r6rs/test.ss
@@ -104,7 +104,10 @@
   
   (define (check-test expr got expected)
     (set! checked (+ 1 checked))
-    (unless (equal? got expected)
+    (unless (if (and (real? expected)
+                     (nan? expected))
+                (nan? got)
+                (equal? got expected))
       (set! failures
             (cons (list expr got expected)
                   failures))))