Tabs behaving sensibly in expect.

[forth.jl.git] / src / forth.jl

diff --git a/src/forth.jl b/src/forth.jl
index 609897a..dd808bb 100644 (file)
--- a/src/forth.jl
+++ b/src/forth.jl
@@ -648,8 +648,13 @@ function getLineFromSTDIN()
 
         elseif key == '\b'
             if !isempty(line)
+                if line[length(line)] == '\t'
+                    print(string("\r\033[K",line[1:length(line)-1]))
+                else
+                    print("\b\033[K")
+                end
+
                 line = line[1:length(line)-1]
-                print("\b \b")
             end
 
         elseif key == '\e'