diff options
| -rw-r--r-- | mu.arc | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/mu.arc b/mu.arc index bd998aa2..1a7c7cc7 100644 --- a/mu.arc +++ b/mu.arc @@ -673,6 +673,11 @@ (caselet x (m arg.0) #\newline ($.charterm-newline) + #\backspace + ; backspace doesn't clear after moving the cursor + (do ($.charterm-display #\backspace) + ($.charterm-display #\space) + ($.charterm-display #\backspace)) ;else ($.charterm-display x))) ) @@ -684,6 +689,8 @@ ; charterm exceptions return (= result #\newline) + backspace + (= result #\backspace) ))) ($.graphics-open?) ($.ready-key-press Viewport)) |