X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=basis%2Fquoted-printable%2Fquoted-printable-tests.factor;h=e8dcf3f33bb399f36e3b0b4eb73003586c0aadef;hp=049d2b326b56dab64759633ce623ab4c3a9b32f2;hb=714c6d2b9464e193e24cb45fab1961d96a9d422c;hpb=e766b83ac0fcc5857602dcfae2791be3b93602b6 diff --git a/basis/quoted-printable/quoted-printable-tests.factor b/basis/quoted-printable/quoted-printable-tests.factor index 049d2b326b..e8dcf3f33b 100644 --- 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" subseq-index? ] unit-test +{ f } [ message >quoted "=\r\n" subseq-of? ] unit-test { 1 } [ message >quoted split-lines length ] unit-test -{ t } [ message >quoted-lines "=\r\n" subseq-index? ] unit-test +{ t } [ message >quoted-lines "=\r\n" subseq-of? ] unit-test { 4 } [ message >quoted-lines split-lines length ] unit-test { "===o" } [ message >quoted-lines split-lines [ last ] "" map-as ] unit-test