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

[factor.git] / basis / quoted-printable / quoted-printable-tests.factor

diff --git a/basis/quoted-printable/quoted-printable-tests.factor b/basis/quoted-printable/quoted-printable-tests.factor
index f57f2f0a1ab4900622123926aa68540916081595..71a800b299f2c82edbb54b873921d85addce727c 100644 (file)
--- a/basis/quoted-printable/quoted-printable-tests.factor
+++ b/basis/quoted-printable/quoted-printable-tests.factor
@@ -23,8 +23,8 @@ and we didn't know hów tö do thât" latin2 encode >quoted ] unit-test
 : message ( -- str )
     55 [ "hello" ] replicate concat ;
 
-{ f } [ message >quoted "=\r\n" find-subseq? ] unit-test
+{ f } [ message >quoted "=\r\n" subsequence? ] unit-test
 { 1 } [ message >quoted split-lines length ] unit-test
-{ t } [ message >quoted-lines "=\r\n" find-subseq? ] unit-test
+{ t } [ message >quoted-lines "=\r\n" subsequence? ] unit-test
 { 4 } [ message >quoted-lines split-lines length ] unit-test
 { "===o" } [ message >quoted-lines split-lines [ last ] "" map-as ] unit-test