CLS: Erase ^L, if it shows up as a garbage character

p-durlej · Jan 5, 2020 · 20f873b · 20f873b
1 parent defd526
commit 20f873b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/cmd/cls.c b/cmd/cls.c
@@ -53,7 +53,7 @@
 
 int cmd_cls (char * param) {
     (void)param;
-    outc( '\xc' ); /* ^L Form feed */
+	outs("\014\b \b"); /* ^L Form feed */
 
 	/* Output stream is neither a file nor NUL nor CLOCK$ */
 	if(((fdattr(1) ^ 0x80) & (0x80 | 0x08 | 0x04)) == 0) {