Tweaking indent.

2022-07-30 15:54:11 -07:00
parent a2aa0c50e2
commit 1e6aeacbe3
2 changed files with 23 additions and 3 deletions
--- a/common/utils.fs
+++ b/common/utils.fs
@ -80,7 +80,11 @@ variable indent
   dup ['] DOES> = if icr then
   dup >flags -TAB AND if -1 indent+! then
   dup see.
-   dup >flags +TAB AND if 1 indent+! then
+   dup >flags +TAB AND if
+     1 indent+!
+   else
+     dup >flags -TAB AND if icr then
+   then
   dup ['] ! = if icr then
   dup ['] +! = if icr then
   dup  @ ['] BRANCH @ =