escapted $line in shell: to prevent expansion

Bushmills · Mar 20, 2022 · b47e027 · b47e027
1 parent 601fcff
commit b47e027
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/defining/shell b/lib/defining/shell
@@ -3,7 +3,7 @@ once
 
 : shell:
     "eval " word$ dup$ create$   \ forth name is command name
-    " $line" join$ quote$ join$  \ add command line to command, then quoted command as args to eval
+    " \$line" join$ quote$ join$  \ add command line to command, then quoted command as args to eval
     "; line=" join$ use$  ;      \ command consumes line.
 
 only forth