diff --git a/collects/help/help.ss b/collects/help/help.ss index 7a252e72..4008939b 100644 --- a/collects/help/help.ss +++ b/collects/help/help.ss @@ -1,7 +1,7 @@ #lang scheme/base (require "search.ss" - browser/external + net/sendurl ; browser/external setup/dirs mzlib/cmdline) diff --git a/collects/help/search.ss b/collects/help/search.ss index bc39a070..8dc5c002 100644 --- a/collects/help/search.ss +++ b/collects/help/search.ss @@ -7,7 +7,7 @@ scribble/basic scribble/manual (prefix-in scheme: scribble/scheme) - browser/external + net/sendurl ; browser/external mzlib/contract) (provide/contract @@ -84,8 +84,6 @@ (send-url (format "file://~a" (path->string file))) (void)))) -(define ((compose f g) x) (f (g x))) - ;; has-match : (listof regexp) -> entry -> boolean (define ((has-match search-regexps) entry) (ormap (λ (str)