diff --git a/collects/help/private/search.ss b/collects/help/private/search.ss index 526c3912..e02a3a6b 100644 --- a/collects/help/private/search.ss +++ b/collects/help/private/search.ss @@ -69,7 +69,7 @@ (define-values (txt-docs txt-doc-names) (colldocs)) (set! docs (append std-docs txt-docs)) - + (set! doc-names (append std-doc-names (map (lambda (s) (format "the ~a collection" s)) @@ -116,8 +116,8 @@ html-keywords doc (lambda () - (with-handlers ([exn:fail:read? (lambda (x) null)] - [exn:fail:filesystem? (lambda (x) null)]) + (with-handlers ([exn:fail:read? (λ (x) null)] + [exn:fail:filesystem? (λ (x) null)]) (transform-keywords (with-input-from-file (build-path doc "keywords") read))))))