] when* ;
: gemini-less ( -- )
- "gemini.txt" temp-file dup exists? [
+ "gemini.txt" temp-file dup file-exists? [
"less" swap 2array try-process
] [ drop ] if ;
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 ;