From 0e156fe8db1d7967dfae3269a50f834b86e4093a Mon Sep 17 00:00:00 2001
From: Eli Barzilay <eli@racket-lang.org>
Date: Fri, 8 Feb 2008 19:09:28 +0000
Subject: [PATCH] svn: r8587

original commit: 0e77057aa973016802666541e51aef399f6df866
---
 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 4dfe631b..4b99d260 100644
--- a/collects/help/search.ss
+++ b/collects/help/search.ss
@@ -100,7 +100,7 @@
                  sc))))
          terms))
   (define word-scorer
-    (and (not words?) (terms->scorer (collect-words terms) #f #t)))
+    (and (not words?) (not exact?) (terms->scorer (collect-words terms) #f #t)))
   (lambda (entry)
     (let* ([words (entry-words entry)]
            [words (if words? (collect-words words) words)]