From 5f37cb549e1d1c7c7e9d0e9d1f4a7f9bce4f1b9b Mon Sep 17 00:00:00 2001
From: Robby Findler <robby@racket-lang.org>
Date: Tue, 20 Nov 2007 13:44:25 +0000
Subject: [PATCH] made searching be case-insesntivie

svn: r7784

original commit: 70907a8932ef5eab8d02daf2ea00e0ba5fb690ed
---
 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 7b6d5f6d..38143fac 100644
--- a/collects/help/search.ss
+++ b/collects/help/search.ss
@@ -57,7 +57,7 @@
 
 (define (generate-search-results search-keys)
   (let ([file (next-search-results-file)]
-        [search-regexps (map regexp-quote search-keys)]
+        [search-regexps (map (λ (x) (regexp-quote x #f)) search-keys)]
         [search-key-string
          (cond
            [(null? search-keys) ""]