core: subseq-index? -> subseq-of?

[factor.git] / basis / help / search / search.factor

diff --git a/basis/help/search/search.factor b/basis/help/search/search.factor
index f6cc8071f676024ea2311dde0c97bcad3b411b4d..7c4a4b10f4fc1dc18a4179e78ec841b16058ae24 100644 (file)
--- a/basis/help/search/search.factor
+++ b/basis/help/search/search.factor
@@ -1,11 +1,10 @@
 ! Copyright (C) 2012 John Benediktsson
 ! See http://factorcode.org/license.txt for BSD license
 
-USING: arrays assocs combinators combinators.short-circuit fry
-help help.apropos help.markup help.stylesheet help.topics io
-io.streams.string io.styles kernel math memoize namespaces
-sequences sequences.deep sorting splitting strings unicode
-words ;
+USING: arrays combinators combinators.short-circuit help
+help.apropos help.markup help.stylesheet help.topics io
+io.styles kernel math namespaces sequences sorting splitting
+strings unicode words ;
 
 IN: help.search
 
@@ -38,7 +37,7 @@ MEMO: article-words ( name -- words )
     search-words [ { } ] [
         [ all-articles ] dip
         dup length 1 > [
-            '[ article-words _ swap subseq? ] filter
+            '[ article-words _ subseq-of? ] filter
         ] [
             first '[ article-words [ _ head? ] any? ] filter
         ] if