X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=extra%2Frosetta-code%2Ftext-processing%2Fmax-licenses%2Fmax-licenses.factor;h=9c931179570be5c8c4930ca6a319fa0e3af78bc1;hp=4bf895ccbaae11281b71416b70156cd0cabb3cc6;hb=714c6d2b9464e193e24cb45fab1961d96a9d422c;hpb=e766b83ac0fcc5857602dcfae2791be3b93602b6

diff --git a/extra/rosetta-code/text-processing/max-licenses/max-licenses.factor b/extra/rosetta-code/text-processing/max-licenses/max-licenses.factor
index 4bf895ccba..9c93117957 100644
--- a/extra/rosetta-code/text-processing/max-licenses/max-licenses.factor
+++ b/extra/rosetta-code/text-processing/max-licenses/max-licenses.factor
@@ -32,7 +32,7 @@ TUPLE: maxlicense max-count current-count times ;
 
 : <maxlicense> ( -- max ) -1 0 V{ } clone \ maxlicense boa ; inline
 
-: out? ( line -- ? ) "OUT" subseq-index? ; inline
+: out? ( line -- ? ) "OUT" subseq-of? ; inline
 
 : line-time ( line -- time ) split-words harvest fourth ; inline