From bd7d0f1ba8a66045385378f1d0d68b9c3b988cbe Mon Sep 17 00:00:00 2001 From: Jay McCarthy Date: Thu, 7 Oct 2010 18:35:25 -0600 Subject: [PATCH] Stupidly forgot to adjust pattern mentioned in the place that I changed original commit: b9b7bb784af96679391d4bbbc44f3870e782c74a --- collects/scribble/extract.rkt | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/collects/scribble/extract.rkt b/collects/scribble/extract.rkt index 7e0fdc82..4f75ad4f 100644 --- a/collects/scribble/extract.rkt +++ b/collects/scribble/extract.rkt @@ -101,7 +101,7 @@ (define-syntax (provide-extracted stx) (syntax-case stx () [(_ orig-path) - (with-syntax ([(_begin reqs (_drop-first (_quote-syntax id) def) ...) + (with-syntax ([(_begin reqs doc-reqs (_drop-first (_quote-syntax id) def) ...) (extract #'orig-path stx)]) #'(begin (require (for-label (only-in orig-path))) ;; creates build dependency @@ -137,6 +137,7 @@ [(box? stx) #`(box #,(loop (unbox stx)))] [else #`(quote #,stx)]))]))]) #`(begin #,(quote-syntax/loc reqs) + #,(quote-syntax/loc doc-reqs) #,@(filter values (map (lambda (i d)