bkyk8rc3zvpnsf5inmcqq4n3k98cv6hj-my-site-hyper-literate-git.test.suzanne.soy-0.0.1

commit 0e156fe8db1d7967dfae3269a50f834b86e4093a
parent 39200e2ff688f460596201d34701e0436d084f89
Author: Eli Barzilay <eli@racket-lang.org>
Date:   Fri,  8 Feb 2008 19:09:28 +0000

svn: r8587

original commit: 0e77057aa973016802666541e51aef399f6df866

Diffstat:
M
collects/help/search.ss
 | 
2
+-

1 file changed, 1 insertion(+), 1 deletion(-)
diff --git 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)]