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

[factor.git] / basis / alien / libraries / finder / linux / linux.factor

diff --git a/basis/alien/libraries/finder/linux/linux.factor b/basis/alien/libraries/finder/linux/linux.factor
index 881d3f7e70b34f8fddcffa1332cf6d6259c5e512..58e5050da3b201bb7994e95eb8c788cb05a3c7ca 100644 (file)
--- a/basis/alien/libraries/finder/linux/linux.factor
+++ b/basis/alien/libraries/finder/linux/linux.factor
@@ -20,7 +20,7 @@ CONSTANT: mach-map {
         [
             " " split1 [ "()" in? ] trim "," split
             [ [ unicode:blank? ] trim ] map
-            [ ": Linux" subseq-index? ] reject
+            [ ": Linux" subseq-of? ] reject
         ] dip 3array
     ] map ;
 
@@ -50,7 +50,7 @@ CONSTANT: mach-map {
             "ld" , "-t" , ":" split [ "-L" , , ] each
             "-o" , "/dev/null" , "-l" name append ,
         ] { } make utf8 [ read-lines ] with-process-reader* 2drop
-        "lib" name append '[ _ subseq-index? ] find nip
+        "lib" name append '[ _ subseq-of? ] find nip
     ] [ f ] if* ;
 
 PRIVATE>