From 871aeca0a6410e4609f704526ee5d65d2034f407 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Sun, 13 Apr 2008 03:07:56 +0000
Subject: [PATCH] more net docs

svn: r9279

original commit: 85583d4ebb09657c2f8f050a804b7fa93c210875
---
 collects/scribble/manual.ss | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/collects/scribble/manual.ss b/collects/scribble/manual.ss
index b5e16f2c..3c8863f8 100644
--- a/collects/scribble/manual.ss
+++ b/collects/scribble/manual.ss
@@ -1243,9 +1243,9 @@
                                             ;; multiple results
                                             (if (null? res)
                                                 'nbsp
-                                                (let ([w (apply max 0 (map block-width res))])
+                                                (let ([w (apply + (map block-width res))])
                                                   (if (or (ormap table? res)
-                                                          (w . > . 30))
+                                                          (w . > . 40))
                                                       (make-table
                                                        #f
                                                        (map (lambda (fe)