diff --git a/collects/scribblings/main/private/make-search.ss b/collects/scribblings/main/private/make-search.ss index 7d548443bb..37f3548654 100644 --- a/collects/scribblings/main/private/make-search.ss +++ b/collects/scribblings/main/private/make-search.ss @@ -122,7 +122,7 @@ (error "internal error: unexpected tooltip"))] [else body])]) (values (compact-url href) (compact-body body)))] - [else (error "something bad happened")]))) + [else (error "unexpected value rendered: ~e" e)]))) (define (lib->name lib) (quote-string (let loop ([lib lib]) (match lib