diff --git a/collects/scribble/html-render.ss b/collects/scribble/html-render.ss
index 2cd3552d..0df04334 100644
--- a/collects/scribble/html-render.ss
+++ b/collects/scribble/html-render.ss
@@ -327,19 +327,20 @@
`(table ((class "tocviewlist") (cellspacing "0"))
,@toc-content)))))))
,@(render-onthispage-contents d ri top)
- ,@(apply append
- (map (lambda (t)
- (let loop ([t t])
- (if (table? t)
- (render-table t d ri #f)
- (loop (delayed-flow-element-flow-elements t ri)))))
- (filter (lambda (e)
- (let loop ([e e])
- (or (and (auxiliary-table? e)
- (pair? (table-flowss e)))
- (and (delayed-flow-element? e)
- (loop (delayed-flow-element-flow-elements e ri))))))
- (flow-paragraphs (part-flow d)))))))))
+ ,@(parameterize ([extra-breaking? #t])
+ (apply append
+ (map (lambda (t)
+ (let loop ([t t])
+ (if (table? t)
+ (render-table t d ri #f)
+ (loop (delayed-flow-element-flow-elements t ri)))))
+ (filter (lambda (e)
+ (let loop ([e e])
+ (or (and (auxiliary-table? e)
+ (pair? (table-flowss e)))
+ (and (delayed-flow-element? e)
+ (loop (delayed-flow-element-flow-elements e ri))))))
+ (flow-paragraphs (part-flow d))))))))))
(define/public (get-onthispage-label)
null)