fix #:help-labels
svn: r8781
This commit is contained in:
parent
25a6c70202
commit
1e002f2e5b
|
@ -68,7 +68,7 @@
|
||||||
x)))
|
x)))
|
||||||
pieces)
|
pieces)
|
||||||
(loop (at-next-keyword (cdr lst))
|
(loop (at-next-keyword (cdr lst))
|
||||||
(cons (cons (quote-syntax 'help-labels) pieces)
|
(cons (list* #'list #`(quote help-labels) pieces)
|
||||||
accum))]
|
accum))]
|
||||||
[(#:once-each #:once-any #:multi #:final)
|
[(#:once-each #:once-any #:multi #:final)
|
||||||
(let ([sublines
|
(let ([sublines
|
||||||
|
|
Loading…
Reference in New Issue
Block a user