diff --git a/collects/scribble/html-render.ss b/collects/scribble/html-render.ss index e8fed5c5fd..905af622d8 100644 --- a/collects/scribble/html-render.ss +++ b/collects/scribble/html-render.ss @@ -1151,11 +1151,11 @@ ,@(append-map (lambda (i) (render-block i part ri #f)) (blockquote-paragraphs t))))) - (define/override (render-compound-paragraph t part ri) + (define/override (render-compound-paragraph t part ri starting-item?) `((p ,(if (string? (compound-paragraph-style t)) `([class ,(regexp-replace #rx"^[\\]" (compound-paragraph-style t) "")]) `()) - ,@(super render-compound-paragraph t part ri)))) + ,@(super render-compound-paragraph t part ri starting-item?)))) (define/override (render-itemization t part ri) (let ([style-str (and (styled-itemization? t)