core: find-subseq -> subsequence-starts, find-subseq-from -> subsequence-starts-from

[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 cedd58cb846d8c14aef8002d1aad645f07be3514..d8698ac68494479850cb8e9515a4f3dc849a5c41 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" find-subseq? ] reject
+            [ ": Linux" subsequence? ] 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 '[ _ find-subseq? ] find nip
+        "lib" name append '[ _ subsequence? ] find nip
     ] [ f ] if* ;
 
 PRIVATE>