From e87efe3ce81fafec18962bcb53342ba44bdb9556 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Fri, 11 Jan 2008 20:09:19 +0000 Subject: [PATCH] fix help start path svn: r8302 original commit: 4e2951c2bcccb1961de7c71304033723e77d8743 --- collects/help/search.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/help/search.ss b/collects/help/search.ss index b5d7bbee..1a57f999 100644 --- a/collects/help/search.ss +++ b/collects/help/search.ss @@ -18,7 +18,7 @@ [send-main-page (-> void?)]) (define (send-main-page) - (let ([dest-path (build-path (find-doc-dir) "start" "index.html")]) + (let ([dest-path (build-path (find-doc-dir) "index.html")]) (send-url (format "file://~a" (path->string dest-path))))) ;; if there is exactly one exact match for this search key, go directly