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

[factor.git] / extra / gemini / cli / cli.factor

diff --git a/extra/gemini/cli/cli.factor b/extra/gemini/cli/cli.factor
index a59cfe68bc759c97b1910c6074a3c4b7e712c8cd..708087c42c3aca581bed89f8d965265ca0fe9499 100644 (file)
--- a/extra/gemini/cli/cli.factor
+++ b/extra/gemini/cli/cli.factor
@@ -101,7 +101,7 @@ CONSTANT: URL V{ }
 
 : gemini-go ( args -- )
     present [ DEFAULT-URL ] when-empty
-    { [ dup "://" find-subseq? ] [ "gemini://" head? ] } 1||
+    { [ dup "://" subsequence? ] [ "gemini://" head? ] } 1||
     [ "gemini://" prepend ] unless
     dup "gemini://" head? [
         [ add-history ] [ add-stack ] [ gemini-get ] tri