Fix bug with outdent (col -> top)

2024-12-17 11:51:32 +03:00 · 2017-08-24 13:20:46 -07:00 · 2017-08-24 13:20:46 -07:00 · c4793de019
commit c4793de019
parent dc993fe091
1 changed files with 4 additions and 4 deletions
--- a/lib/vast2.hoon
+++ b/lib/vast2.hoon
@ -310,10 +310,10 @@
        ::
        =/  eat-newline  +>(txt t.txt, loc [+(p.loc) 1])
        =/  saw  look:eat-newline
-        =/  cont
-          ?|  ?=($~ saw)
-              ?=($done sty.u.saw)
-              (gte col.u.saw col)
+        =/  cont                                        ::  continue?
+          ?|  ?=($~ saw)                                ::  line is blan
+              ?=($done sty.u.saw)                       ::  end of input
+              (gte col.u.saw top)                       ::  no outdent
          ==
        ?:  cont 
          [[lin &] eat-newline]