diff --git a/scribble-lib/scribble/private/manual-scheme.rkt b/scribble-lib/scribble/private/manual-scheme.rkt index 3321dcdf..f3718247 100644 --- a/scribble-lib/scribble/private/manual-scheme.rkt +++ b/scribble-lib/scribble/private/manual-scheme.rkt @@ -92,16 +92,17 @@ [(_ #:file filename #:escape unsyntax-id lang rest ...) (with-syntax ([modtag (datum->syntax #'here - `(unsyntax (make-element - #f - (list (hash-lang) - spacer - ,(if (identifier? #'lang) - `(as-modname-link - ',#'lang - (to-element ',#'lang) - #f) - #'(racket lang))))) + (list #'unsyntax-id + `(make-element + #f + (list (hash-lang) + spacer + ,(if (identifier? #'lang) + `(as-modname-link + ',#'lang + (to-element ',#'lang) + #f) + #'(racket lang))))) #'lang)]) (if (syntax-e #'filename) (quasisyntax/loc stx