]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/gemini/cli/cli.factor
io.files: exists? -> file-exists? and rename primitive.
[factor.git] / extra / gemini / cli / cli.factor
index 34b1fa0af21933612dbfa998b9fc0313299a8a49..de6291800c8ed7aef523b0564fc33a6c86626fd9 100644 (file)
@@ -124,7 +124,7 @@ CONSTANT: URL V{ }
     ] when* ;
 
 : gemini-less ( -- )
-    "gemini.txt" temp-file dup exists? [
+    "gemini.txt" temp-file dup file-exists? [
         "less" swap 2array try-process
     ] [ drop ] if ;
 
@@ -141,7 +141,7 @@ CONSTANT: URL V{ }
     URL ?first [ >url "/" >>path gemini-go ] when* ;
 
 : gemini-shell ( args -- )
-    "|" split "gemini.txt" temp-file dup exists? [
+    "|" split "gemini.txt" temp-file dup file-exists? [
         "cat" swap 2array prefix run-pipeline drop
     ] [ 2drop ] if ;