diff --git a/collects/scribble/base.rkt b/collects/scribble/base.rkt index 75b61be4..292d9840 100644 --- a/collects/scribble/base.rkt +++ b/collects/scribble/base.rkt @@ -226,7 +226,9 @@ (case-lambda [(doc s) (if doc - (list (module-path-prefix->string doc) s) + (if (list? s) + (cons (module-path-prefix->string doc) s) + (list (module-path-prefix->string doc) s)) s)] [(doc prefix s) (doc-prefix doc (if prefix