diff --git a/collects/scribble/sigplan.rkt b/collects/scribble/sigplan.rkt index b2ded8e1..41fcf979 100644 --- a/collects/scribble/sigplan.rkt +++ b/collects/scribble/sigplan.rkt @@ -27,13 +27,13 @@ [category (->* (pre-content? pre-content? pre-content?) ((or/c false/c pre-content?)) - block?)] + content?)] [terms (->* () () #:rest (listof pre-content?) - block?)] + content?)] [keywords (->* () () #:rest (listof pre-content?) - block?)]) + content?)]) (provide preprint 10pt include-abstract) @@ -122,11 +122,10 @@ (define (category sec title sub [more #f]) (make-multiarg-element (make-style (format "SCategory~a" (if more "Plus" "")) sigplan-extras) - (append - (list - (make-element #f (decode-content (list sec))) - (make-element #f (decode-content (list title))) - (make-element #f (decode-content (list sub)))) + (list* + (make-element #f (decode-content (list sec))) + (make-element #f (decode-content (list title))) + (make-element #f (decode-content (list sub))) (if more (list (make-element #f (decode-content (list more)))) null)))) diff --git a/collects/scribblings/scribble/sigplan.scrbl b/collects/scribblings/scribble/sigplan.scrbl index 49f2a450..90eaf36b 100644 --- a/collects/scribblings/scribble/sigplan.scrbl +++ b/collects/scribblings/scribble/sigplan.scrbl @@ -65,9 +65,9 @@ Declares information that is collected into the copyright region of the paper.} @defproc[(category [CR-number pre-content?] [subcategory pre-content?] [third-level pre-content?] - [fourth-level (or/c #f pre-content?) #f]) block?] -@defproc[(terms [content pre-content?] ...) block?] -@defproc[(keywords [content pre-content?] ...) block?] + [fourth-level (or/c #f pre-content?) #f]) content?] +@defproc[(terms [content pre-content?] ...) content?] +@defproc[(keywords [content pre-content?] ...) content?] )]{ Typesets category, term, and keyword information for the paper, which