diff --git a/src/toolsrc/ed.pla b/src/toolsrc/ed.pla
index 6b5fb86..357f93e 100755
--- a/src/toolsrc/ed.pla
+++ b/src/toolsrc/ed.pla
@@ -1438,30 +1438,24 @@ def editmode#0
             is keytab
 				if flags & insmode
 					indentsel
-				else
-					undentsel
-				fin
-				if not (flags & selection)
 					cursoff
-                    if not ^(txtlinbuf=>[cursrow])
-                        curshpos((curscol + 2) & $FE)
+					if not ^(txtlinbuf=>[cursrow])
+						curshpos((curscol + 2) & $FE)
                     else
                         autoindent(txtlinbuf=>[cursrow])
-                    fin
+					fin
 					curson
+					break
 				fin
-                break
-            is keydetab
+           is keydetab
                 undentsel
-				if not (flags & selection)
-					cursoff
-                    if not ^(txtlinbuf=>[cursrow])
-                        curshpos((curscol - 2) & $FFFE)
-                    else
-                        autoindent(txtlinbuf=>[cursrow])
-                    fin
-					curson
+				cursoff
+				if not ^(txtlinbuf=>[cursrow])
+					curshpos((curscol - 2) & $FFFE)
+				else
+					autoindent(txtlinbuf=>[cursrow])
 				fin
+				curson
                 break
             is keyctrly
                 flags   = flags ^ insmode